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Zum Stand der Technik 
der Bildschirm-Terminals 


Wissenschaftliche Erkenntnisse in 
der Konzeption von Bildschirmar- 
beitsplätzen 


Die Bundesrepublik Deutschland ist das einzige Land, in dem 
Normen und Sicherheitsregeln über Bildschirmgeräte existie- 
ren. Durch eine koordinierte Arbeit zwischen den deutschen und 
österreichischen Normenausschüssen wurde erreicht, daß in 
beiden Ländern nicht widersprüchliche Normen aufgestellt wer- 
den, wenn die Abweichungen nicht durch sachliche Gründe be- 
dingt sind. Doch Normen sind Papierwerk, sie müssen ihren Wert 
in der Realität beweisen, um als anerkannt zu gelten. Das gilt ins- 
besondere für die Normen über Bildschirmarbeitsplätze, da sie 
nicht einen real existierenden Zustand festgeschrieben haben, 
sondern auch erhebliche Änderungen fordern. 

Die Normen über Bildschirmarbeitsplätze sind keine reinen ‘er- 
gonomischen’ Normen, die produktunabhängige Gestaltungs- 
kriterien festlegen. Vielmehr sind sie produktbezogene ergono- 
mische Normen. 
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Die Tintenstrahl- 
Technologie 
erobert neue 
Bereiche 


Neben den obligatorischen 
Massenspeichern wie Band 
und Diskettenlaufwerk stellt 
der Drucker das wichtigste 
Peripherie-Gerät dar. Bislang 
bildeten zwei Systeme dabei 
den Schwerpunkt: Ther- 
modruck stand für geringe 
Lärmbelästigung sowie Un- 
abhängigkeit von Farbbän- 
dern. Der Nadeldruck war 
sehr geräuschintensiv, ermög- 
lichte aber im Gegensatz zum 
Thermo-Verfahren Durchschlä- 
ge. Da beide Druckerarten auf 
dem Prinzip der Matrixdar- 
stellung beruhen, ist von Kor- 
respondenzqualität aller- 
dings nicht zu sprechen. 

Der Tintenstrahldruck hinge- 
gen liefert das, was die Fach- 
leute “new letter quality” nen- 
nen, ein Schriftbild also, das 
sich auf jedem Briefbogen 
sehen lassen kann. Extrem 
leise und schnell stellt der 
Ink-Jet-Drucker aus heutiger 
Sicht das System der Zukunft 
dar. Lesen Sie selbst auf 
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Basic Kurs 
Teil 1 


In diesem Heft beginnen wir 
mit dem angekündigten Ba- 
sic-Kurs. 

Der Kurs ist bewußt einfach 
gehalten und setzt keinerlei 
Grundkenntnisse voraus. Er 
soll dem absoluten Beginner 
helfen, mit seinem C-64 
zurechtzukommen. 


BASIG-Physik- 
programme 


Duenbostl/Oudin 


Das Buch behandelt vor- 
nehmlich solche Bereiche, in 
denen sich der Einsatz eines 
Microcomputers zur Bewälti- 
gung physikalischer Prob- 
leme am besten eignet. 
Beschreibungen wie Wurf- 
und Fallbewegungen unter 
Berücksichtigung des ath- 
mosphärischen Luftwider- 
standes sind 

ohne Rechner meist nur durch 
Differentialgleichungen zu 
operationalisieren. Mit dem 
Rechner lassen sich Nähe- 
rungsverfahren formulieren, 
die im 

Fortsetzung auf Seite 57 
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we COMMODORE 64 BASIC v2 Wiki 
64K RAM SYSTEM 38911 BASIC BYTES FREE 


Basic Kurs 
Teil 1 


Der folgende Kurs soll den unbedarften Computerneuling dabei helfen, die Arbeitsweise 
seines gerade erworbenen Gerätes zu verstehen und ihn in die Lage zu versetzen, lauf- 
fähige Programme in einer für seinen Basic-Interpreter verständlichen Programmier- 


Sprache zu schreiben. 


Der COMMODORE INTER- 
PRETER versteht das Basic 
»V 2.0«. Basic ist eine Pro- 
grammiersprache die speziell 
für Anfänger als Lernsprache 
entwickelt wurde. Übersetzt 
heißt ‘BASIC’ BEGINNERS 
ALL PURPOSE SYMBOLIC 
INSTRUCTION CODE. 


1. Lektion: 

DER ‘PRINT’ BEFEHL: 

Nach dem Einschalten Ihres 
Commodore 64 sehen Sie am 
oberen Bildschirmrand den 
Schriftzug: 

**** COMMODORE 64 
BASIC V2 **** 64K 

RAM SYSTEM 38911 BASIC 
BYTES FREE READY. 

Sowie 

ein kleines hellblaues Blinken 
des Quadrat, welches 
‘CURSOR’ genannt wird. Der 
Computer will uns damit mit- 
teilen, daß sich in seinem 
ROM der Interpreter V2 befin- 
detund daß noch ca. 39 KILO- 
BYTE Speicherplatz zur Ver- 
fügung stehen. Weiterhin si- 
gnalisiert uns der blinkende 
Cursor, daß der Computer auf 
eine Eingabe wartet. Lassen 
Sie sich nicht von den vielen 
Fremdworten  irritieren; wir 
werden später noch auf sie zu 
Sprechen kommen. 

Nachdem wir nunmehr wis- 


sen, daß der Computer auf 
eine Eingabe wartet, wollen 
wir uns das erste Mal an der 
Tastatur versuchen und ge- 
ben Hallo ein. Spätestens 5 
Minuten nachdem wir das 0 
eingetippt haben werden wir 
bemerken, daß nichts weiter 
passiert. Wir schließen dar- 
aus, daß die Eingabe der Ma- 
schine so nicht genügt. Als 
nächstes drücken wir die 
‘RETURN’-Taste, welche den 
Computer dazu veranlassen 
soll, das Geschriebene in sei- 
nen Speicher aufzunehmen. 
Tatsächlich antwortet uns der 
INTERPRETER nun und es 
erscheint: 

SYNTAX ERROR. 

Ein Blick in ein englisches 
Wörterbuch zeigt uns an, daß 
ERROR zu Deutsch Fehler 
heißt und wir etwas falsch ge- 
macht haben. Tatsächlich 
braucht der INTERPRETER 
einen Befehl, der ihm sagt, 
was er mit unserem Hallo 


_ machen soll. Wir benutzen 


dafür den Befehl ‘PRINT’, was 
soviel wie ‘SCHREIBE’ heißt. 
Der Befehl muß im Basic im- 
mer vor der Anweisung 
stehen, demzufolge schreiben 
wir jetzt: 

Print Hallo. 

Es erscheint am Bildschirm: 
0. Offensichtlich war es 


schon halbwegs richtig, denn 
der Computer hat wenigstens 
keinen Fehler angezeigt. Lei- 
der haben wir jetzt immer 
noch kein Ergebnis, da wir ja 
wollten, daß die Maschine 
‘HALLO’ schreibt. 

Die Erklärung des Vorganges 
wird jedem klar, wenn wir auf 
den Begriff ‘VARIABLE’ zu 
sprechen kommen. Es sei zu 
diesem Zeitpunkt nur gesagt, 
daß der Computer annimmt, 
die Buchstaben ‘HALLO’ 
standen für eine im Speicher 
befindliche Zahl. Wie man 
Werte für Variable festlegt, 
wird später noch erläutert. 
Damit der Interpreter den Un- 
terschied zwischen einer 


- Variablen und einem Text er- 


kennt, muß der Text gekenn- 
zeichnet werden. In Büchern 
hebt man einen gesprochenen 
Text dadurch hervor, indem 
man ihn in Anführungszeichen 
setzt. Genauso wollen wir es 
nun auf unserem CBM 64 ver- 
suchen und geben ein: 
PRINT ‘HALLO”. 

Tatsächlich reagiert die Ma- 
schine darauf und schreibt 
HALLO auf den Bildschirm. 
Weiter passiert allerdings 
noch nichts. Es ist jedoch 
jetzt schon zu erkennen, daß 
der Computer so ohne 
weiteres ein normales 
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Deutsch nicht versteht. Auch 
wenn Sie versuchen den Be- 
fehl in Hebräisch oder Chi- 
nesisch einzugeben, wird sich 
nichts tun. Der Computer 
braucht, um Befehle zu erken- 
nen und Anweisungen auszu- 
führen, ein klar formuliertes 
Basic. 

In der nächsten Lektion wer- 
den wir auf die Funktion der 
Variablen eingehen und wie 
man mit Hilfe des ‘PRINT’ Be- 
fehl rechnerische Vorgänge 
am Bildschirm sichtbar 
machen kann. Am Ende jeder 
Lektion werden ein paar kurze 
Aufgaben stehen, mit denen 
Sie sich auseinandersetzen 
können. Die genaue Lösung 
wird am Anfang der nächsten 
Übung erklärt. 

Die Aufgaben für diese Woche 
sind: 

1. Was ist in dieser Zeile 
falsch: 

PRINT ‘COMPUTE 
COMMODORE. 

2. Kann der folgende Befehl 
funktionieren: 

?"WERNER WAS HERE”. 
Sollten Sie mit den Aufgaben 
Schwierigkeiten haben, so 
sehen Sie doch einfach mal 
im Handbuch nach. 
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„ TONACORD 
BTX MODUL6A + 
Electronic-Mail 


Zur HIFI-VIDEO-SHOW 84 in 
Düsseldorf zeigte die Firma 
TONACORD ihr Btx-64- 
Modul. Es handelt sich um ein 
ganz neues Zubehör für Com- 
modore 64 Besitzer, die damit 
auch ihren Home-Computer 
an einen Btx-Fernseher an- 
schließen können. 

Der Preis liegt bei nur DM 
248,- unverbindliche Preis- 
empfehlung und zielt daher 
speziell auf den privaten An- 
wender. Der Vertrieb erfolgt 
über den Fachhandel und 
Computerring, Ringstr. 70, 
2300 Kiel. 

Die populären Computer- 


Hacker werden immer aktiver | 


in den Electronic-Mail-Sy- 
stemen der Fachhändler, die 
hierfür speziell ein DATEN- 
BANKSYSTEM FÜR AKU- 
STIKKOPPLER 300 Bd. ein- 
gerichtet haben. Es existieren 
ungefähr schon 20 freie jeder- 
zeit zugängliche Daten- 


banken, für die TONACORD 
mit dem Computerring einen 
Software-Pflege-Vertrag an- 
bietet. Die Datenbanken wer- 
den schneller und umfang- 
reicher. So können Erfahrun- 
gen zu Fabrikanten und 
Softwarelieferanten unterein- 


Btx-Modul 
an User-Port 


ander ausgetauscht werden. 
Firmen steuern damit den 
Außendienst und Projekt- 
gruppen können über große 
Entfernungen zu schnelleren 
Ergebnissen kommen. 


Ermüdungsfreie Dateneingabe: Inmac’s Handauflage 


Effizientere und bequemere 
Dateneingabe garantiert die 
praktische Handauflage von 
Inmac. Schmerzende Hand- 
gelenke gehören der Vergan- 
genheit an: Für die optimale 
Arbeıtsposition des Handbal- 
lens sorgt diese ergonomisch 
hervorragend konzipierte 
“Stütze”. Zwei drehbare 
Justier-Rädchen an beiden 
Seiten bringen die Auflage - 
ohne Verschieben des Auf- 
lage-Pults - in die individuell 
beste Position. Eingabefehler 
werden drastisch reduziert. 
Die Inmac Handauflage paßt 
zu allen gängigen Eingabe- 
Pults. Sie ist 47 cm breit und 
22 cm tief. Die Höhe ist von 
30 bis 45 mm einstellbar. Für 
netto DM 49,- gibt es die Auf- 
lage bei Inmac, 6096 
Raunheim. 
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Disketten-Archiv 


Disketten sind empfindlich 
gegen Schmutz. Ein staub- 
dichter Behälter gibt Sicher- 
heit. ERNO hat ein kom- 
paktes Disketten Aufbewah- 
rungs-und Archivsystem 
entwickelt, das vor Staub, 
Rauch, Licht und mechani- 
schen Einflüssen schützt und 
eine schnelle Ablage, sowie 
bequemen Zugriff ermöglicht: 
die ERNO UNIBOX. 

Auf kompakten Raum wird 
Platz für 80 Disketten ohne 
Couvert (bzw. 48 mit Couvert) 
geboten. 8 Abteile ermög- 
lichen den Aufbau einer über- 
sichtlichen Datei. Die stabi- 
len Trennwände verhindern 
Beschädigungen, wie Verbie- 
gen und Knicken. Mit ergono- 
misch gestalteten Griffmul- 


den lassen sich die Abteile 
leicht mit einer Hand “blät- 
tern” und weit öffnen. Die 
Fächer werden mit dem dazu 
gehörenden Archivierungs- 
Etiketten-System gekenn- 
zeichnet. Das hochwertige 


Kunststoffmaterial ist “Anti- 
Statik” behandelt. Die Ge- 
staltung im modernen Design 
(Sockelfarbe computerbeige, 
braun-rauchglasfarbene Ab- 
teile) paßt sich jeder Umge- 
bung an. Die UNIBOX bean- 


sprucht wenig Raum und fin- 
det auch in Schreibtisch- 
Schüben Platz. Im Fachhan- 
del für ca. 40,- DM zu 
haben. 


DatEx 64 ist eine univer- 
selle Daten- und Textverar- 
beitung, vorwiegend für 
den Privatanwender, mit 
überdurchschnittlichen Lei- 
stungen. Sie können mit 
DatEx 64 Ihre Videocasset- 
ten, Briefmarken, Rezepte, 
Schallplatten, Bücher etc. 


verwalten und Texte bear- 
beiten, mit deutschen Son- 


derzeichen. Durch einfache Anwendbarkeit ist die Ar- 
beit mit DatEx 64 auch für den Anfänger schnell zu 
erlernen. Die wichtigsten Eigenschaften in Stichwor- 
ten: 

Datensätze frei erstellbar (von einem Zeichen bis zu 
einer DIN-A4-Seite in der selben Datei)- verschiedene 
Suchoptionen - Zugriff über jeden Eintrag (Daten- 
bankähnliche Funktion) - Erweiterungsmöglichkeiten 
- Textbreite bis 80 Zeichen (Scrolling) - Übernahme 
des letzten Wortes (kein Trennen notwendig) - nach- 
trägliches Einfügen - deutsche Sonderzeichen auf den 
Druckern: MPS 801, VC 1525, Seikosha GP 100 VC — 
Bildschirmfarben jederzeit änderbar - Daten- und 
Textverarbeitung wird nur einmal geladen - Plausibi- 


litätskontrollen —- deutsches Handbuch — nur Disket- » 


tenversion. 
DM 69,90 


HÄNDLERANFRAGEN 


Bitte senden Sie mir 
D per Nachnahme (zzgl. DM 5,50) 


Disketten 64 braucht jeder 
Anwender, der mehr als 
fünfzig Programme oder Da- 
teien auf Diskette besitzt. 
Mit Disketten 64 hat die 
 Sucherei nach Program- 
men ein Ende und außer- 
dem sind Sie jederzeit über 
Ihren Dateien-Programmbe- 
stand informiert. Der Vor- 
a ——— teil von Disketten 64 be- 
steht eigentlich darin, daß die Eingaben nicht über die 
Tastatur erfolgen, sondern von Disketten 64 selbstän- 
dig eingelesen werden. 
Die wichtigsten Eigenschaften in Stichworten: 
Erfassung nach max. 40 verschiedenen Gebieten — 
Sortieren nach Programmnamen (alphabetisch) - Fol- 
gende Informationen werden von Disketten 64 einge- 
lesen und ausgegeben: Länge des Programmes 
(Blocks), Anzahl der Teile des Programmes. Name der 
Diskette, fortlaufende Programmnummer - zusätzlich 
kann ein kurzer Kommentar eingegeben werden — 
deutsches Programm. 

DM 69,90 


EEG IST ERCE 


BESTELLCOUPON 


D per Vorauszahlung (zzgl. DM 3,50) 


Auslandsbestellungen nur gegen Vorkasse möglich (zzgl. DM 7,-) 


Name: 


PLZ: 


Ort: 


Adresse: 


Unterschrift: 


AdrEx 64 ist ein menüge- 
steuertes Adressenverwal- 
tungsprogramm. 

Adrex 64 zeichnet sich 
durch eine hohe Anwender- 
freundlichkeit aus. Es kön- 
nen 450 Adressen pro Da- 
tei verwaltet werden. Die 
wichtigsten Eigenschaften 


in Stichworten: 450 Adres- 
sen pro Datei (Cassetten- 


version 150) - zusätzlich‘3 Textzeilen - Direktzugriff 
auf alle Kriterien einer Adresse, auch Textzeilen- kom- 
fortable Suchmöglichkeiten - löschen, ändern, aus- 
drucken einer Adresse - Listen und Etiketten drucken 


— Absicherung gegen Fehlbedienungen - Bildschirm- ’ 


farben jederzeit änderbar - deutsches Programm. 
Cassettenversion (150 Adressen) DM 69,- 
Diskettenversion (450 Adressen) DM 79,- 


ERWÜNSCHT. Alle Programme für den Commodore 64. Computeranwendungen Seucan. Postf. 24 44, 8600 Bamberg 1, Tel.: 0 95 42/83 48 R 
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Bitte einsenden an: Computeranwendungen Seusan, Postfach 24 44, 8600 Bamberg 1. 
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Wer größte Datenmengen re- 
gelmäßig von Diskette auf Dis- 
kette sichern muß, wird damit 
auf Dauer wenig Freude ha- 
ben. Und Sicherung über Plat- 
tenlaufwerke bringt andere 

spezifische Probleme mit sich 
— nicht zuletzt hohe Kosten 
und fehlende Standards. Da- 
her bot sich eine Lösung ähn- 
lich der in der Groß-EDV ein- 


G-16 - der 


Es tut sich etwas auf dem 
Computermarkt. Die neuesten 
Nachrichten schlagen sich 
gegenseitig, täglich kommen 
Informationen, aber auch die 
Gerüchteküche kocht. Letzte 
Woche stellten wir Ihnen an 
dieser Stelle den C-264 vor, 
der inzwischen auch CGommo- 
dore plus 4 heißt. Heute ist 
der kleine Bruder an der 
Reihe, der C-16. 


Rein optisch ähnelt der C-16 
ziemlich stark dem VC-20. 
Formschönes Gehäuse und 
hervorragende Tastatur ist 
bei Commodore-Computern 
inzwischen ein Standard, der 
auch vom Verbraucher gefor- 
dert wird. Der C-16 arbeitet 
ebenso wie der C-264 mit 
dem Basic 3.5, dem wesent- 
lich leistungsfähigerem Basic 
wie das vom C-64 bekannte 
V.2.0. Im wesentlichen unter- 
stützt das Basic die Grafik- 
und Soundprogrammierung. 
Bedingt durch den kleinen 
Arbeitsspeicher von 16KByte 
sind _Window-Fähigkeiten 
dem C-16 nicht gegeben. Es 
wird auch keine integrierte 
Software angeboten, Sprite- 
definitionen kennt der C-16 
ebenfalls nicht. Von daher 
kann bei beiden Commodore 
Neuheiten nicht von Konkur- 
renz zum C-64 gesprochen 
werden, der wohl seine 
Position halten wird. Mit dem 
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gesetzten Magnetbandtech- 
nik an: Das Magnetband- 
Kassetten-Laufwerk. 

TANDBERG DATA, in der Ver- 
gangenheit ein erfahrener Pro- 
fi auf dem Magnetband- und 
Hifi-Sektor, war federführend 
an der Entwicklung einer stan- 
dardisierten 1/4-Zoll Magnet- 
band-Kassette beteiligt. Die 
QIC-STOR-Kassettenlaufwer- 


”Kleine’” von Gommodore 


C-16 visiert Commodore ins- 
besondere den Käuferkreis 
der Schüler und Studenten 
an, der Preis liegt mit rund DM 
350,- im Bereich großzügiger 
Taschengeldetats. Dies soll 
eine umfangreiche Software 
Palette untermalen, die an 
Schulen und Universitäten 
das CAL (Computer AIDEO 
Learning) unterstützen soll. 
Hier wurde eindeutig der 
Trend — “weg vom Spielcom- 
puter” verwirklicht. Die 
Grafik- und Soundmög- 
lichkeiten geben bei weitem 
nicht soviel her wie beim 
C-64, der VC-20 Sound ist 
ebenfalls besser. Der C-16 
hat allerdings eine hohe Gra- 
fikauflösung von 300x200 
Punkten, jeder vom Basic ein- 
zeln ansteuerbar. 16 Farben 
mit je 8 verschiedenen Hel- 
ligkeitsstufen lassen bis 128 
Farbkombinationen zu. 


Technische Daten 

-7501 Mikroprozessor mit 
Taktfrequenz von 0.89 - 
1.76 MHz 

- 16 KByte RAM 

- 32 KByte ROM mit Basic- 
Interpreter 3.5 

— 40 Zeilen a 25 Zeichen 

— Groß-Kleinschreibung 

- 320x200 Bildpunkte 

— 1 Tongenerator, 
1 Rauschgenerator 

-67 Tasten 

-8 Programmierbare 


Die zuverlässige Sicherung für unersetzliche Daten 


TANDBERG DATA QI6-STOR 


ke der Modellreihe TDC 

3200/3300 bieten je nach 4- 
oder 9-spuriger Aufzeich- 
nungstechnik die beachtliche 
Kapazität von bis zu 60 MB 
Daten, bei Aufzeichnung im 
Streaming-Verfahren. Damit 
lassen sich gleichermaßen die 
Bestände von Personal-Com- 
putern wie auch größere Da- 
tenmengen von Terminalsta- 


Funktionstasten 


—Video- und TV-Ausgang, 
serielle Schnittstelle, Kas- 
setteninterface, Expansions- 


Compuhe mib 


tionen kostensparender als 
bisher sichern. Das Risiko 
fehlerhaft zurückgespielter 
oder verlorener Daten vermei- 
den hochwertige Aufzeich- 
nungs- und Prüftechniken. 
Mit QIC-STOR TDC 3200/ 
3300 von TANDBERG DATA 
sind Ihr Daten wirklich 
sicher. 


port, Anschluß für 2 
Joysticks. 


(sr) 


Fortsetzung zum Programm 


Goldfinger 


für den En 64 


aus 

"Compute mit” 37/84 
Ss818 PRINT" ABC! a-.703 +S!#mDEF '3#7 37? 1234 %#+, 38% BlEFIN |? Sr =133 
‚Su N" 
=<229 PRINT"WDEFROEI12I20311111I11W0M)11)"; 
5938 PRINT"DEF SISSSSTSSSS5THH:GHI t R INg t ;55555555555=" 
sagaa FRINT" wu t R tEıa<SSSS55555555: ie ta)"; 
5958 PRINT" BR MD N OO m;555S5S555= a 
sasa PRINT mtiN NaR”:FRINT" rt 0m<S5S55555S5:11J JJIIN N uR?t 
so?7@a FRINT” tt 0m:35555555=tL[ IN Naar" 
S088 PRINT"tE 20) Om(SSSSSs35:" 
s238 PRINT"ZEZEZWIE 2222223132 2222222ZBREE ": 
SieEd PRINT"ZE2M:SE222222IT2 22222222 "; 
Slia FRINT'SEZMWSEZ22222 TEE 2222ZZZZEREM)) 3133333 IIIIIIICCCIIMMIIIIIIIII23I 


3925177 

S1E0 PRINTLOOMK'm]": 

5130 PRINT " Sfeieisieinieneg + gut Sat Et EIERN"; RETURN 

esaa FORI= ee :FORII=SITO4: IF.7#RNDCIIYSSTHENZICI,I1)=1:GOT0O69828 
E010 2Z(;,11>= 

E82D NMEXTII, y 

Sa30 #=INTCIHRNDCLI+LISV=SINTERNDXIIRIH LI: ZICH,Y)=2 

69489 X=INTC4#RNDCLIHLISY=INTCRNDCIIKA+L I: ZICH,Y)=3 

€eaS5B8 RETURN 

098 LL=254:G60SUBE3Q:FOKEBS, 194: POKEFA,S:PRINT"W"5:LL=229:G05UB248 
Te82 6C=28:6B=-2 

‚319 A$='"gR. IONDA" :GOSUE3SR 

ra29 n&="MWIE MHÄBEN EINE FALSCHE ASTE BERUEHRT. ":G0OSUB358 


838 Af="BER -OMPUTER TRANS- BFORMIERT IE ALS BIOND-—HIP IN SEINE —7.": 
GOSU8B350 

‚248 A£="MOUOENN VIE Z #4BENTEUERBBBESTANDEN HABEN,BE- BKOMMEN “IE DEN” 

850 een AEr" aKıll OLDF INGER A. ":505UB358 


ravOo PO"E13S.8& :UAITISS,1:POKE19S,1 

300 FORI=ITOF:ACII=SSIHI:NEXKT:RCIIS-ZZIR(ZI=SZ2:RCZHYI=SL:RK4)=-1:80=-4304:R0=BO +1 
7118 IFGB=3THENLL=2498::60SUEZ238:PR INT" N" :GOSUB248 :PU=PU+INT<C19x5S+3) -6C:G0T0O8988 
7111. IFGC=3THENLL=239:G0OSUB2T9:G0O T0O3BAODO 

Ti12 LL=2350:505SUB2338:FOKEBS ,285:POKEFA ,2E:PRINT"" 3 :6G0S5UB398 
7112 PRINT'SIZI"CC’IE "CB" m" 

7115 PRINT" AUIRESEREERIRZEIIEIENTRNERN" 

1298 FOERISITOISSFRINTTIERE" SNEXTSPRINT" ERS 

7125 PÜKEJEBI+AAR,B 

7129 LL=-200:G0OSUB2EI49 

7288 FGKEBO,RC2I:FOKERO,ACZI:FOKERO +AR ,2:POKEBO +AA ‚6: 


"7:PFOKE4601,192: 


7205 POKE133,8:WAIT133,1:%X=INTC3#RNDCII+IIERESRKIERFSACH) 
TEZe R=PEEK(157): IFR=54THENTEOB 

7238 IFR=12THINBE=-22:BF=All):POKETI+2,139:650T0738%9 

7228 IFR=37THENEESES:EFSATZI:POKETI+Z2,135:GOT07308 

ves8 IFR=21THENBE=-1:BF=SA(4):FPOKETI+2,148:G0T07390 

7EFDO IFR=SZZTHENBE=S1:BFSACHITPOKETI+Z,145:GOT0730808 

7208 IFRE=OTHEN?T48D 

z&L IFFEERCBÜHBE)ISY3ZZTHENPOKETI+2,8:6C=GC+1:GOTO?7198 

Tz218 BO=E0+BE:FOKEBO,BF:POKEBO +AA,6:POKEBO-BE, 121 

TIaB N=B:FORI=S1ITO4: IFRO+RCII=S<BO+EE)THENK=SRCIISKFeACI) 
421 NEATEIFA<SGORNDPEERK RO +) =32THENRE=SK:RF=SKF:GOTO7508 
7403 Y=RI+RE:IFPEER (A IS 3 3ZTHEN?A4BS 

730+ IFFEEK(H-ZEI<CHIOSANDPEER (K+1)C>IBZANDPEEK (K-1)<S > IBZANDPEEK (K+22)< > 1OZTHEN?S 
a2 


7485 IFPEEK (RO+BE:=32THENRE=BE:RF=BF:GOTO?SBOQ 
7ga86 X= nn 134 +1): IFPEEK<RO+R(X I) =3ZTHENRESR (HI ERFSACKI:GOTO?SDOO 
?418 FE=Ö:FORI=1T04: IFFEEK<CRO+RCIYI=3ZTHENRE=SRUIISRF=SACI) 


Compuhe mik 7 


oo 


© 


sa3a 


009 


Fü 


DOQOLUW 


NO WO WO OD m m am wm on 
22 LVDWWUUGHTUMTDmM Mm 
OH UWE GHBH SO HE NT MI GO OD 


ou L£LUumumn- DW fu 


9nmMOoc 
oomnm 


vouanakbEenr 


So u W 
- 9 0 © 


. nen NOIR O DOM KM W 
o 
3 
oO 


nmG GG ü 


b>) 
© 
[e) 
69060 - 


00009 


- 00 


- gvHoeoeamomnananın N © 
O 


GO0OLftnn nm Mi fa fan. fo m 
NO CG DL un- Sun D- 
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Sul nom mn mm m 


eo1ol 


NE=<T: IFRE=BTHENFORETI1+2,0:66=6B+1:GOTO7 108 
RI=RO+RE:POKERO,RF:FOKERO+AA ,Z:POKERO-RE,1B81? 


:5GITITEIB 
AllY=3S:Rr(2Y3=38:AX3)=968:AHL4)=97:LL=200:G05UB239:PRINT"":GOSUB249:T1=36875 
Rei)=-22:RCZI=S22:RCIHI=L:RC4)=-1:RH=6? 
GÜSLUBSBO:FX=O 
FREINTY SILBER SEHE: 233 SEORIESTEIRE TEE BE" 
PRINT" BE u WERE EI BEDN A WE BR" 
PRINT'BESE WEIRE  BUUE DENE DER 
PFTNT'IBESER SE 2 T u 2 DR BU RER 
PFISTER 2 DER Da IE WEM LE IM u Ei: A Bm"; 
FRINT" E 8 BREMEN WE BEE MW RE 


PRINT ERBE ER BISENE  EBRER 


PRINT'TIEESTH WERE WE WERE WR "SPC" E WR 


PRINT RRETTERTERE TR 


EIEMY| EBBl. |"; 


FÜRI=41652T0960 1: IFFEEK f1)=32THENPOKEI ,67:FOKEI+AA,4 j 
FFINT' SERSTRERIITEEREIRURANLIDEIV| BEI - |"; :POKE4681,182:POV.E4681+33732 ,B:Ahr=33 


FORI=41682T04601: IFFPEEK<I)=3ZTHENPOKEI,67:POKEI+AA,4 


; NEXT 


REED" 7 
:POKE4681,182:POKE4681+33792,0:AA=33 


E0=4163:R0=4348:POKEBO ,A(3) :POKEBO +AA,5:FOKERO, 188:POKERO +AA,E 


R=PEEK 197): IFR=54THENS488 
IFR=13THENBE=-22:BF=A(1):GOT0839808 
IFR=37THENBE=22 TBF=A(2):60T08308 
IFR=22THENBE=1:BF=A\3):GOT083988 
IFR=ZITHENBE=-1:6F=Acd4) 
IFPEEK\BÜ+GBE = 1OZTHENS4BOO 
IFFEEK(BO+BE +22) =83THENGOTOI888 
IFPEEK «BÜ+BE ) =28 THENGOSUBIB0OOO 
IFBÜ+BE=ROTHENBO=BO+BE :GOTOSSOS 


IFFEER (BC+BE)I=67THENPZ=PX+1:PRINT"BH+,A"PX:POKET1,208 
Bü=BÜ+BE:POKEBO ‚BF :POKEBO +AA ,E:POKEBO-BE, 1658:POKETI1,® 


RE=B:FORI=1TU4: IFFEEK<RO+R“ II I=1EBTHENRE=RCII:ERX=32 


NEHT: IFRE< >3THEN3SOB 


PFÜ=INT{\BO-4938 ) 722) :RI=INTC<CRO-498I6) 722) 


IFPO=SRITHENSEAIIO 


IFFO>RIAMNDPEEK <RO+2ZI< > IAZTHENRE=22:GOTOSSODO 
IFPO<RIANDPEEK (RÜ-22)< >1B2THENRE=-22:60T05508 
IFBEO >RORNDPEEK <RO+LI<CFIBZTHENRE=1:GOT0OSSBB8 


IFPEERKRO-I>< DIBZTHENRE=-1 


FCKERI.RZ:POÜKERO +AA,4:RO=RO+RE:RA= 
IFRO=BOTHENLL=289:G605UB238 :PU=PU+INT<(PX/48):GOTO3BO88D8 


IFRS=1658THENRS=32 


PEEK<RO)J:POKERO, 108: FOKERO +AN,2 


IFPY > 137 +42 «SSANDPEEK (BO +44 ) =S3THENPU=PU+1B+INTC1045S):G0OTO1A08O 


GOTCS203 
FOKE13S ,0:W4IT198,1 


3S35=-S5K1N:GOSUBZI9:HT=INTCHT/ZISVCS=-VCHtH "MER BE": 


PRINT"Q":FOKEES,1932:END 
REM++TABELLE 


GOTO1208 


FR IMT" Dieirbe LINK TE "PU:GOSUB248:LL=150:POKE198,8:WAITISS,1:G0SUB23 


P<S)=FU 
FORI=1T0O3:FORI1=1IT03 


IFP<{II>=PSIIDTHENNEKTII,1:GOTO12608 


R=P(IDERE=SNECI) 


MSCHI=SNELITI:SPCIISPEITDIENELTLI=SKS:PCIIISK:NEXTII, I 


PRINT" A" :POKEBS,194:POKEFA,111: 
PRINT" SERI+ # « JOND- IITLISTE#H%# 


FÜRI=1TOFT:NSUIISLEFTEINSCII , Bd tt" onen." 
FRINTI"M. "LEFTSCNENTI,S>" "PECID:PRINT 


NEHT:LL=254:560SUE248 
FOKEISS,B:WAIT133,1:G0OT03 
REM#H451IEGAKRN ER 
ne BASTHENSSOAO 

F="i6D WiVE THE @UEEN" 


en 


DATAZ2B ,309,216,399,212,608 


DATA216,8608,212,600,203,698,212,1208 
LL=-209:66SUB239:PRINT" A" 5 :POKEFA,198:PU=PU+INTCCGB-GC+10)4S5):55=55+.1 


GOSUB2I48:POKEBS,134 
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20,608 ,220,600,22 


2,608 


Der ideale Schönschreibdrucker für Ihren 
C 64* von OLYMPIA electronic compact 2 


®eingebautes Interface für @ 100 Zeichentypenrad 
seriellen Port @ 14 Zeichen/Sekunde 
@ Adresse 4 oder 5 einstellbar @ Leerstellenunterdrückung 
® Schreibmaschine mit Korrek- @ sofort lieferbar 
turspeicher @ enorm preiswert 
@ ON-OFF-Line Taste trennt @ viele Typenräder, Gewebe- 
Betriebsarten Karbon-, Multikarbonbänder 
® Zeichenabstand (10, 12 und @ bundesweiter Werkskun- 
dendienst 


15 Z/Zoll) und Zeilenabstand 
(1, 1 1/2 und 2 zeilig) 
vom Rechner einstellbar 
® en Tastatur als compact 
R 


* auch für andere Rechner mit Centronics, V.24 und IEC-Bus. 
Alle OLYMPIA-Druzker (ESW 102, 103 u. 3000) für den C 64 lieferbar 


Telemannstraße 18 
-Datentechnik 7250 Leonberg (Höfingen) 
®@ 07152/6305 


= 
MNSENNINTEHE Software 
ir a Außergewöhnliche Spiele und Pro- 
Bei uns finden Sie 


gramme, z.B.: Flugsimulatoren, Dateı- 
3 programme, Krankheitsdiagnose, 
fast alles für Ihren Biorhythmus, Lottoberechnung und 


VC-20/64 Fe 


Prüfen Sie unser Angebo 
Hardware: der Tiefstpreise. 
Speichererweiterungen 8K-64K RAM, 


sy rn ET ar 
Moduladapter 2/3/5-fach, Recorder- Schnell das neue Spitzeninfo 
interface, Schnell-Save Module, Tool- anfordem, für 2DM in Briefmarken 
kitmodule, 40/80 Zeichenkarten, Garantiert 24 Std. Infoversand. 
Epromprogrammierer, Epromkarten, 
PIO IN/OUT Module, Interface, Joy- 
sticks, Paddle, und...und...und.. 


Zubehör: 
Kassetten, Disketten, Staubschutz- 


hauben, Bücher, Bausätze, Resettaster, 
Alle Stecker, Bauteile, und...und. 


Händleranfragen erwünscht. 


Rotdomweg 15 
1000 Berlin 45 


DATEN -TECHNIK 


205S2 RESTORE «FOR! =1TOIESREADH,B:POFETI,A:FO 
EXT 

20558 PRINT" "LEFTSCQUS, I+3):NEXTEPRIN 
20500 As="TLUN BO7Mal" :GOSUBSSO 

2O51O Ar="MWWIE HABEN DEN 

B358 

20615 IFSS>.STHENSS=.9:85=5541Q 

20617 As="MWIE HABEN JETZT EINE MIUNKTZAHL 

"FU 

20520 As="Mekd-IE NAECHSTE _UNDE BIRD SCH 
20700 As="ma | ASTE!!":GOSUB3SB 

21008 SS=5S410:POKE138,9:WAITI3S,1:G0SUBE3R: 
30000 LL=199:PRINT"U" :POKEBS, 134: POKEFA,255: 
SC10Q As="ME4IE HABEN -„HREN":GOSUB3SQ:AS="AU 
39150 Af="EEWINL #IE WIRKLICH DIE":GOSUB358 

?0202 AF="ECHTE DA7M?":G0SUB3SB 

30250 As=" RER —RSTE DER 'IOND- MIITLISTE' 
SSCHTE" 

30260 GOSUB3S® 

30390 PÜKE133,0:WAIT198,1:G0SUB230:G0T012000 
35088 LL=199:PRINT"J" POKEBS, 1934: POKEFA,255: 
S5100 As="gelE SIND ZWAR WIEDER MWBEIM IUBSC 
UB259 

25208 A&="NICHT ERFUELLT.®IE 

35380 PÜKEI13S,2:WAITI38,1:G05UB238:60T0120088 
40009 H=INT/SAOHFNDEL7+41SEI: IFPEEK(K)=1OETH 
48050 POKERO,R% 

48190 RX=PEER ÜV:RO=K:POKERO, 100:POKERO+AA,Z 
40168 LL=254:50SUB218 

48200 RETURN 
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@0 


I1ZA 
RU 


wenn Sie ihn mit unserem Görlitz-VC-EPSON-INTER- 
FACE an einen Epson-Drucker anschließen. 


Unser VC-EPSON-INTERFACE Best.-Nr. 8422 bringt alle 
CBM-Grafikzeichen in vierzig verschiedenen Schriftarten und 
-breiten * HARDCOPY mit SIMON’s BASIC sauber und 
hochauflösend * hat einen eingebauten Selbsttest * einen 2K 
Pufferspeicher * einen eigenen Z80-Mikroprozessor * zwei 
IEC-Buchsen (wie Floppy) * IEC-Adresse einstellbar * keine 
Modifikation des Druckers * definierbarer Zeichensatz (FX) 
bleibt frei * ein Interface für C-64, VC-20 an alle Epson-Drucker * 
Lieferung komplett mit DIN-Verbindungskabel und ausführlicher 
Bedienungsanleitung. 


EPSON RX-80 mit VC-Interface Best.-Nr. 8422 DM 1330, - 
EPSON RX-80 F/T mit VC-Interface Best.-Nr. 8422 DM 1502, — 
EPSON FX-80 mit VC-Interface Best.-Nr. 8422 DM 1889, — 
EPSON FX-100 mit VC-Interface Best.-Nr. 8422 DM 2362, — 


Preise inkl. MwSt., Katalog 1/84 kostenlos. 


Besuchen Sie unsere Ausstellung in der Rhein-Mosel-Halle in 
Hager vom 29. Okt. bis 31. Okt. 84. Wir freuen uns auf Ihren 
esuch! 


GÖRLITZ COMPUTERBAU-Postf. 852 - 5400 Koblenz - Tel. 0261-27500 


R11=1TOB:NEXT:POKET1,8:FORII=1TOIS:N 


Trig" 


"+ G05UB359 : A$= "I IL —, 717-3 TATSACHL ICHBGEFUNDEN. ":GOSU 


YON :":G0OSUB358:PRINT"SUCIIIIIIITIEBEI 


WERER ! I! 1 1"2GOSUB3S8 
GOTO1® 


GOSUB248 
FTRAG NICHT ERFUELLT":GOSUB3S® 


IST DER WEINZIG ECHTE ,UNVERFAEL 
GOSUB248 
HRAUBER ‚ABERBDER #UFTRAG WURDE ":605 


BSIND EIN 2NGSTHÄSE . ":GOSUB35Q 


ENA4ABODO 


:PR=PX+3 


MON- 


— 


sie 


I 


für den VG-20 ohne Erweiterung 


Zum Laden genügt es, einmal die ’SHIFT/ 
RUN-STOP-Tasten zu drücken. 
2. Nach Beendigung des Ladevorganges 
müssen Sie jeweils zum Spielbeginn die 
'F1'-Taste betätigen. 


Als gestreßter Kommandant der Terrani- 
schen Intergalaktischen Streitkräfte 
stehen Ihnen’genau 72 Stunden Sonderur- 
laub zu. 

Diesen benutzten Sie, um auf dem Ferien- 
planeten 'ZRYXL’ zu landen. 

Ihre verdiente Erholung wurde jedoch jäh 
gestört, als Sie feststellen mußten, daß der 


Planet gefräßige Bewohner hat. 

Diese fressen nämlich bevorzugt Pro- 
viantkisten ratzeputz leer. 

Da Sie nur 5 gefüllte Proviantkisten dabei 
haben, ist höchste Aufmerksamkeit ge- 
boten, zumal ein gelandetes Wesen mit ei- 
ner leergefressenen Proviantkiste gleich- 
zusetzen ist. 

Ihre einzige Chance besteht darin, alle An- 
greifer (mit der linken Hand) abzufangen. 


Übrigens soll es schon vorgekommen sein, 
daß ein Urlauber in das Bein gebissen 
wurde, nachdem die gesamte Verpflegung 
aufgefressen war! 


Gute Erholung — die werden Sie nötig 
haben. 


Steuertasten 
'<' = nach links 
’>'= nach rechts 


In der linken oberen Ecke befindet sich 
die Punkteanzeige. 

In der rechten oberen Ecke befindet sich 
die Zahl der bereits leergefressenen 
Kisten. 


BETEN ETDERSEEERTE TIPS VRSTCHRTERTEDNERTERF ERST IT FRETTADEEEETTT ETF TER 
1 REM ## COFTRIGHT Er Ben ECKFALIER 1984%+% 


> FÜRE2E369, 253: POKE3E373 


18 PRINT TINTEN RS EIMÖHSTER" FRINT"WERIKLEeL IHESIRHIBIEBSRECHTS" 


za FREIHNT" 


SAREDDRDRIE ITTE HARTEHE" 


119 FÜRI=ATO1623:FÜKES128+ 1, FEEKÜSZFES+ TI NEST 


124 PÜRE262EF9,2 >40 
4 FÜRT=SETÜOISSSTERE 
3 FÜRI=SETÜ?T 
IATAS.6,113.38, 


DATAES, 2:1, 1.1. 1,27 
DATA2S ER” 4 Pe) 


„ 
yo 


De 


1, De ‚cH dr 


5,36, 96 


DATAE. 182, 
DATA129, 12 
DaTRz4. 128,1 = 
IATHAS, 3, Ei. 138. 155, 1 


NSS 0° Tod 
up lo Tr“ 


IE 


IATAEA.25,193,1655, 155,1 


> DATA, 154.146, 154,145. 
3 DATAE, 245, 163 
"3. TATAE, 132.64. 132, 
: IATAS, 221. 
IATAS. 1655. Ph 
- DATAS, 165,5 

; DATA, ie wie 31. 53, Sa 
125 FÜHESSO, 128: FOKE St 


. 
4 DATAS, 118. 
je) 
- 


{ 


:EERDA:FÜKESE4E+T+I.A 
S1; 43, 4, 53 
IATA4A, 132,224, 16,249, 224, 132,248 


j 


Giidpün 
. mt ev IB® 


A Ir 


2.24. ö 
33 BEE 
: IATAB, 234, 174,234, 133,142.0,8 

3 DATAS. 149, 214,244, 152,143. 


F 
1 jun Fr 3 


:NEXTIST 


“ap 


- Tr Id 
- Aydı '- 


ons IT od Bl 


‚® IN IT“ 


3, 


36,28:36:33,8.8 

212.8,8 
‚173,169, 205, 
23,64,0,8 
143. 221.51, 2093, 2.0 
145.73:193,0,8 
3.189, 45.18: =.8,8 


3,8 


Compube mi 


269 FÜHRE368739.5 


:FÜRES31.131:PÜKE133,1: PRIHT"g" 


| 
1a POKE263653, 246: PRINT"TIPUHKTE:R"S:CLR 
20 PRINT" MEEIIDBBBEBSPÄCE MÜNSTER" :PRINTTAB{?33"RF1=START" 


“a GETB$: IFBSS>"w" THENSO 


GOSUBZ365 


FÜRT=35783T033 
GETPE 


IFE=1THENPOKE7FZ24+HZ1. 
1:G05UB1908 


3 FÜKE36369, 253: A=1:POKE26373,15 
3 PRINT" TIMIMIRIRISIEInRTEDSTETRKDSTETKTRUSTEDNDN Rn 


FÜRT=33532T033813: POKET , 53:NEAT 
FÜRT=336281T038707 :PÜKET 4: NEXT 
735:PÜKET,2:NEXT 


3 IFP£=","THENA=SA-1: IFAT-ZÖTHENA=-28 
IFP£=". "THENA=A+1 : IFAZBOTHENA=B 
IFPf=","THENPOKESA3IS+K, 32: POKE3124+%, 32: POKES142+4., 32: GO5SUB2085 

IFP$=". "THENPÜKE3895+% . 32: POKES117 +4,32: POKE3139+%, 32: G0O5UB2005 

5 BR Z1=INT<RHDC1>#219:B=1:A=d 
Z:FOKEFFRZ+Z1,32:21=21+22: IFZ1>4 17 THENZ1=8: B=ö:Ai=1: II 


- 


IFPEEK(?7F24+Z1>=66THENS=35+75:FOKETFAZ+Z1, 32: B=B: A=1:21=0:605UE1108 
IBBRBn"S:PRIHT"SIRBbRbbhBbbhuhhbuhee" 1 


313 PÜKE36574, 123 

328 

438 PRINT"ATT: 

495 IFI=STHENSSO 

437 FÜRE26374,0 

sg6 GOTIZ2089 

559 FORT=7745T08128STEP22:PÜKET, 72:POKET-22,32 

560 FÜKE36373, 15: FOKE36876, 13@+W :U=W+S: NEXT 

688 FÜRT=8128T08141:PÜKET, ?72:POKET-1,32:PÜKE35876, T-7386 
615 IFFEEK(T+1Y=S7AURPEERST+1>=7ITHENESO 

620 HEAT 

558 PRINT" SIIMIKIKIEIISIKEIEEBBENE |; 

655 FÜRT=ZSATO1SSSTEP-.25 

675 FÜKE36377,T 

877? FÜRT=15STOXSTEP-.1:FÜKE35878, T: NEXT :FOKE36877,8:POKES6376,8 


555 FORT=1TO7SBE:NEXT:GOTOIO 


15654 FORT=254T01345TEP-2: POKE3E878:15 


1216 RETURN 


1126 FÜRT=245TI2BASTER-1: A 5:T 


zasa FÜRESBIS+H,66:PÜKESHFT 
141+#, 71 
zulä RETURN 


:POKE36877, T: NEXT: POKE3E377,8 
T:NEXT : FOKE35376,8: RETURN 


4,67 :POKES118+4, 68: POKES119+A, 653: POKES14B+A, 70: POKES 


Amazonas 


Der kleine Max kämpft sich durch das 
Amazonasgebiet. 

Um seinen Hunger zu stillen, versucht 
er, mit Steinen große Raubvögel zu tref- 
fen, um sie anschließend zu verspeisen. 
Dabei muß er jedoch höllisch aufpassen, 
nicht von den blitzschnell zuschnappen- 
den Krokodilen erwischt oder von den selbst- 
geworfenen Steinen getroffen zu 
werden. ß 

Verhelfen Sie Max zum Überleben im 
Amazonasgebiet! 


Steuertasten: 
’<’ = nach links 


'>'= nach rechts 

€ = Steinwurf (nur dann möglich, wenn 
Männchen frontal sichtbar). 

'F1’ = Spielstart 

Bonuspunkte: 1000 P. nach Beendigung 
eines jeden Sektors (= nach 15 Vögeln). 
Bonusmännchen: Jeweils bei über 3000, 
6000 und 9000 Punkten. 


Links unten sind die Reservemännchen 
abgebildet. 
Links oben ist die Punkteanzeige. 


Rechts oben ist der jeweilige Sektor 
abzulesen. 


Compute mib 


für den VG-20 + 16K 


Höchstpunktzahlen der besten drei Spieler 
werden bei Spielende ausgegeben. 
Programmaufbau: 


‘ Das Programm besteht aus zwei Tellen, die 


nacheinander mit ’SHIFT/RUN’ geladen 
werden müssen. 

1. Tell: 

Zelle 60: Reservierung von Speicher für 
neudefinierte Zeichen. 

Zelle 30: Überprüfung auf 16K Erweite- 
rungsmodul, 

2. Tell: u 

Zeile 20-24: Übertragung des ROM- 
Zeichenbereichs in den RAM Bereich, auf 
die Weise, daß bei doppelt hoher Zeichen- 


darstellung die Buchstabengröße nicht 
verändert wird. 

Zeile 25: Neue Zeichen werden generiert. 
Zeile 60-62: Neue Bildschirmgröße wird 
generiert. 

Zeile 75-126: Spielerklärungen. 

Weitere wichtige Zeilennummern wurden 
mit 'REM’ gekennzeichnet. 


Varlablenliste: 
PU = Punkte 
H1/H2/H3 = Höchstpunktzahlen der be- 


MAN BEACHTE: 


sten drei Spieler 
Pı$/P2$/P3$ = 
drei Spieler 

HI$ = Rangvariable für Höchstpunkt- 
zahlwertung 

X = Horizontalvariable für Männchen- 
bewegung 

SE = Sektor 

V1/V2 = Variablen für gespeicherten Hin- 
tergrund bei Steinwurf 

ZA = Vogelanzahl 

TR = Anzahl getroffener Männchen 
2/S2/S3/S9 = Variablen als Ein- und 


Initialen der besten 


EEIM EINTIFPEN SOLLTE HUR DANN ZEILE 7 EINGEGEBEN WERDEN, VIENN 
UNBEDINGT EINE AUSSCHALTUNG YON *STOP’- UND “RESTORE’ TASTE 


ERMUENSCHT IST. 


EINTIPPHILFE: 

1 REM" m = CTRL ELK 

2 REM" 4 = CTRL WHT 

3 REM" 4 = CTRL RED 

4 REM" 8 = CTRL CYN 

5 REM" #4 = CTRL PUR 

& REM" fi = CTRL ÖRN 

? REM" © = CTRL BLU 

8 REM" m = CTRL YEL 

3 REM" 4 = CTRL RYS ON 
10 REM" = = CTRL RVS OFF 


nen il 


FEN 
1a FEIHT"I'FORE2ES73.5 
FP. E. 


2a FRINTTAECSEI"M SOFT 1984" 

39 IFFRECEISLSOSSTHEHFRINTTAB(BEI"KEITTE DRUECKEN | 
":GOTOSA 
48 FRINTTAE(SSI"KEITTE STECKEN SIE ALS M ERSTES EIN 
Im" 
54 FRINT"ANSCHLIESSEND MUESSEN MSIE ZURUECKSPULEN UND = 
68 FOKE43.64: FOKE44,31:FÜKET339, 8: NEM 
7a HEM 


FÜHETSE. 124 PÜEEFP1B. 2 


PÜKESEST 


CH=32763 
FORT=E144TOFZOHSTEPLE 


HET 


np IMG ıSı 


IFH>1ETHENN=E 
HE=<T: FÜKE3ES7E, 0 
GOZUEZA3GH 


Du Re at ct N EN ec ES EB SET SEE DREI DR DBCH LEE Zn 20 


EN EIN N M 


FRINTSPECIES"« 


12 


FOKE2SSS4, 19 FORE3STES: 21 
FOEE, 

GOSUEZEA3RS 
FORTSPZHATC7133H1587STEPZ 


FERDA:FOKET,A:FOKET+1.A:FOKESSS 


FRINTTRB(CEI"M KAEMFFEN SIE SICH DURCH 
PRINTSFCE34P"RSTEUERTASTEN: ": 
FRINTSFCEI1>", = HACH LINKS"; 
FRINTSPCKEI1>". = HACH FREU HTS"; 

= STEINWURF" 


11 REM" m = Fi-TASTE 
12 REM" 9 = FZ-TASTE 
13. REM" @ = F3-TASTE 
14 REM" K = F4-TASTE 
15 REM" I = FS-TASTE 
1& REM" 4 = F&-TASTE 
17 REM" MI = F?-TASTE 
15 REM" M = F&-TASTE 
13 REM" M = CURSOR HACH UHTEN 
26 REM" 7) = CURSÖR NACH OBEN 


FEM # COFTREIGHT Er’ PETER ECH 


EALER 12954 % 


FORTSFZ1ETO7S11H16E5: RERDA:FOKET.A:NEAT 
FORT=7290T07 13916875 TEFZ:FÜKET.E:FOKET+1. 8: NEXT 


59.206 :FOKE3655655.,25:POKE35567 +33 


5.N+125:N=N+2 


Compuhe mib 


SIE ZUMSLADEN 
1ER RAM aM 


Ausschalter von Funktionen gebraucht 
VF/FI = Variablen für Männchenform 
K4 = Krokodilposition 

MI/M2 = Variablen für Vogelform 

P = Grundposition für Steinwurf 

HO = Grundposition für Vögel 


21 REM" WM = CURSOR NACH RECHTS 
22 REM" I = CURSOR NACH LINKS 
23 REM" 4 = LURSOR HOME 

24 REM" 72 = CLR HOME 

25 REM" _7 = (SHIFT) FCDE 

26 REM" I = (SHIFT> G 

27? REM" | = (SHIFT) B 

23 REM" | = (SHIFT> H 

23 REM" I = (SHIFT) Y 


“SHIFT“ & “RUN. 
STECKMÖLLL EIH 
EFHELT LADEN. ":GOTO7O 


24 
3,8:PRINT"TI"TAEC1EE "AMAZONAS" PRINT" VON P. ECEBAUER 1304" 
RESTIRE:FÜRT=1TO4E: RERDM NEST 


FÜRW=SOTO? :FOKET+H, G:NEZT :FÜRU=SSTOLS:FOKET+U,PEEKCCH} :CH=CH+1:NEAT 


URS AMAZONASGEBIET!"; 


82 FRINTTHEC1SZI"K PETER ECKEAUER SOFTWARE  SEUM START Fi DRUECKEN" 

25 FÜORT=4.245104355: POKET+23792. 4: FOKET. 75: POKET-1.32:FORW=1TOS@:GETAS: IFAF=" "TH 
EH1:H . 

HET PUBET, FE: FORY=1TOZSE:NERTI.T 

FORT=4357T4361 FÜKET-1. 32: FOKET » 92: FORW=1TO100:NEXTW. T:FOKE435S, 32: POKEI3E1. 


De EL Da I ET 


ICE CEAUENGE RER. 


FÜRT=43FUTO43E1STEF-1FOKET+33732, 4: FOKET, P3:FOKET+1, 32. FORYU=1TO2S6: NEXT 
FÜKET. 74 FÜRW=1TUS@:GETAF: IFAS="W" THEN130 

HEXTW. T!FORT=4354T0435S3TEF-1:FOKET+1. 22: POKET , 36 

FÜRSTEN 

HEXTI.T:FÜKE4EEL. 32: POKE43SS. 32° 

FÜKESSZ0R. 4: FÜKE44BB, 31: 'FORT= 110508: NEXT 

FOKEISEZ 393.3 


FOKE: 333,30: FORL= 1TO198: NEXT: PoKeaos, FÜRE4233. 32 
FÜRT=S1TOESE: GETAF: IFAF="" THENLS3 

HEST 

GÖSUEZAZEN 


BER PENNE ERDE 


u EN a Eu 1 Esch En 2 et SE a De 


3 FEINTTABE1O2"BPLUNKTEWERTEILUNG:®; 
a4 FRINTSPCSZ1P"RT ooonncna. 18 PUNKTE"; 


FORT=1TNES9:GETRE: IFAF="w" THEH139 

HE#T 

PREINTSPCCZIP"RF sono nase 28 PUNKTE"; 

FORT=S1TOESI:GETAF: IFAF="W" THENL13BO 

HEAT 

FRINTSPCS29, "Er oecson00. SB PUNKTE"; 

112 FÜRT=1T0259:5ETA$: IFAF="w' THEN13O 

113 HET " 

114 FRINTSFE 242" BEOHUSFUNKTE" SS FRIHTZPGEFO" FUER JEDEN HELEN SEKTOR"; 

116 FEINHTZSFCESH"A1BGE PLINETE"; 

FOÜRT=1T0239:GETAF: IFAF="w" THEH13H 

NE=T 

FRIHTSPELZZE>"R FETER ECKEAUER SOFTWARE"; 

FEINTSPEK2>"SgUM START Fi DEUECKEN" 

FORT=1TO16820: GETREF: IFAF="' THENH12A 

HE#T 

GCTA7S 

U EN ee T1:FOKE3SSTT, ZUA+2&T1:HEATTL. 1 
FIRET=1T015:FÜHE?Z ,2:FÜKEIESTF,Z 4: PORE3B877, 2304 T HEAT : FORE3ES77.0 
#=12:Fl=21:YF=3:Pl=a:SE=1:P=4343:P1l=4370:P2=437a: W131: V SZ: MIS3ECHO=45AH ZA 


bu de de Dei fen Dh Du dh Du Du ua DT ET EN AT IT 


ee I 5 a 


DEÖMMEMEN-J 


- 
ai 


D4=1:1I5=1: D&=1: IB= a 

GOSUEBSESENE 5, 3 7 

FEIHTTREESSI "N “ x AN nt Be a rn MA. "; 
FRIHT"*-. Mn a a TH BE Ts 2 TE m ir KL 21% VA LE 5 


FREIHT"N 
FRIHTTARCESSSSTTTTTTTTTTTTTITTTTITTTTTETTTTTTTITTOTN ; 
PEINT"BTTTTTITITTTTTTTTTITITTITTN 

as17" = FÜRE43S3, “ll 


ÜBEN Soc DR BE Wo SE DR ba) - 


POKE3SBTT 
42 IF 


a! 


ex FÜKESE77, 0 
10FS2=1 THENZSE 
1THEHSÜSLES1 ZA 


UM) 


TIPDIPIFLIDI [Te 
in E NN DEN Ba old 


259 IFS3=1THENGUSUESAASE er 
252 IFTRS=3THENSEROG 
255 1F32=1 THENGOSUEZ1AEG 


255 FÜKE36377 , 253: POKE36877.8 

2E0 IFZ>@THEN2SS 

265 Z=INTERNDE15#S+1 3 ZASEA+L:IFGZAFLSISCINTCZAFLSIDTHENGOSUBFZERE 
285 ZI=INTERNIG1D#E+1> | 

279 IFZ=4URZ=STHENSOSUES1E 
271 ONZGOSUE3ASES. 29550. 20 
229 IF3S=1THENGOSLUEZ1SEH 
235 GI2SLEZIEEE 

zaAa GO=UBSE4ER 

309 GUTOZ218 = 
Pod POKE36973, 230: YF=VF+1 : IFVEISTHENYF=4X=K+L: IFKPZ4THENK=24 
saog3 PÜOKE3ESTS:G 

34995 GOTO30915 _ , 
30018 FÜKE38375. 232: YF=YF-1: IFYFÄLTHEHNF=SZK=SH-1: IFACZTHENS= 
zaalz PIKE3E37I,M 

30915 IFYF=1THEHFI=?4 


SOTOzZ>RE 


ER 


Compute mib 13 


6 IFYF=SZTHEHFI=73 

3 rF IFYF=3THEHFI=S1 

Saal IFYF=4THEHFI=S75 

3a313 IFYF=STHENHFI=76 

39629 PÜKEZS1E2+A,2:POKE43EF+H. 32: PÜKE4371+%, 32: FOKE4370+7, FI 
za9>4 FETUFRH 

34923 RENEFFFFFFFEFEFFEESCHUSS-ZPIELEFFFERFEEER 

sans PÜHEF+#A1+25, Y1:FOKER+#1+33317, 42 

3aass YI=PEER(P+RL12:VZSPEERCP+A1r337932) 
IFY1=MLÜRY1=SMETHENYI=32 

FÜKEF+#1. 39: POKEP+31+33732,8 
IFPEEECF-25+#19=3SORPEEKCP+K1-259=35THENGOSUBSBSGIE 
IFFEEREF-25+#21>=310RFEEK(P-25+%13=3ZTHENGÜOSLIBSOS1G 
IFFEEEP+#1-25)>=33THENGÜOSUBFOSZE 

P=F-25: IFP+#124135tr#1THENS3=S0: POKE4135+#1.32:82=1:Y2el 
FETUFH 

PEIHT"S"TARCSOH"SFUHKTE: "FU 

FEINT"S"TARCEI> "SEKTOR: "SE 

FETURH 
PRINT"ZATTIIISTII-ITTIE III III 1": POKESESTS. 15:RETUFRN 
IFPEEK.( 137 3=5THENIFYF=3ANDSZ=RTHENSS=1:41=8 
IFPEEE.( 197 )=37THENGÜSUESOSHR 

420 IFFEERC1FTISZFTHENGOSUBSOELE 

>04259 RETUFH 

3a500 FENEEFFEEFFFEEFEN IGELFÜFRNFFFFFFR RER 

15@1 M1=85:N2=55 

GCTU3055385 

N1=31:M2=32 

GOTI3E6858 

11=93:2=33 

FEMNEFFREERFFERER N OGEL FLIEGCTFFRRRERERE 
HO=4148+21#25:HI=HO 

FOHEHU-1, 32: FOKEHÜ+33732, 8: POKEHO, Mi 

SOZUBZO4ER: GOSUEZE4AE 

FÜKEHG. MZ:GOSUEZO4E8 

HÜ=HO+1: IFHÜF4 1 FEO+Z1FEITHENZ=R: FORE41POHZ1E25. 32 
FETLRH 

KEMNEFSEFFEFEREREEETFEFFERFFFFFEFEEEE EEE 

PU=Fil+2S 

Fu=Fl+15 

Fll=PyJ+1& 

FÜKE3CSTT.O 


N 
MMMNMIN 


.BEUMANMGECUD: 
FREE WE 


u an (En a a! 


I ZT 
N 


- 
Oo 


or 
I! 


SLOHSTOLAEREREOLFESEALALOTOLREALRKOTE 
ERNERSELRURSERTHEN 

EMMA ANMNMNMNHMHMINNING 

EN BT Een Big en 


DB | Br ED er Bo re rn 


ki FÜKEF+#1.22:FÜREP+S1-25, 57: FOKEF+#H1-29733792: 2 
K FORT=1T035:ZT=INTERHDE13#100+130 7 POKE38376, ZT: NERT 
sa GRSUEZEZAE: FOHEFR+F1-25, 53 
a FORT=ZTTOEF2:FÜORESESTE. T:NEAT:FÜKEF-23r#1,32 
zasra FÜK ER ‚FÜKES 37515 
ag ! j 
2ua25 IFD4= ITHENIFFU> Z9EMTHEHDIF=E: GOSIESZEE 
302565 IFDS=1THEHIFFUFSAGETHENLS=SE: GOSUEZZREG 
zussr IFDE=1THENIFFUFFORSTHENISSA: GOSUPSZRAK 
23a5>3 RETUFH 
31049 RENFFFFFFEEFFEFEFGERANITATIONHSFFFFFERERH 
z10139 FÜKEF+=1.%Y1:POKEP+#A1r337 32, W2 
s31920 WI=FEERCF+A1r255 VeSFEEKSPIR1+S3792425) 
=1a21 IFY1=MLORYISMETHEHVISSZ 
1839 FÜKEF+H1rES, DE: POKER+#1423 ren. 
31544 FORT=73TO7E 
31052 IFFEEKSF+SOHS1D=TTHENSFS 
21064 NEST 
=1979 IFPEEKIF+SG+AL)=SSITHEHNSF=1 
1975 F=P+25 
210909 IFFZ#1+434STHENSZ=B: FÜREF+H1, 32: P=4245:V1=51:VEs2: FÜKE3CS77,B:POÜKE4ST7OHÄ,F 
I . 
.211609 RETUFH 
=12 EL RERESELER GETRÜFFEHFFEFH 


7 5, "PO IE, E36875,U: FÜRE3S274,W 
& | Str,02 
=1235 IFUSSGOTHENFOKEI344 288%. 3 
=1240 IFHU=S17STHEHFÜRE4SFSHESFS 4 


14 Compute mit 


IFU=1SSTHEHNFÜREF24SFEStHR 32 
Er nn 


16350 

‚ek: RETURN 

ae er 
‚=4336 TO44 EEE PÜKER 22° HEHT 


=44 HHEFTOIFEE+KESTERF-25 
+25, 20 FOREK, 99: GOSLE20418: GOSUEZO410: FORE1=1TOTS:NEHTK1.K 


: FOREIIZCHKZ, "3: FÜOHEFI4FEEHR E25, 92: FÜHEI4ZGHH +3 IZ-25, 6 
f) EINFAR IE: = 1A 
IFFEER N 442-304 E25 32T THENGOSUESI EEG 
a 5359=1:’K4ed4ag-25+K 2: Ze 
>1229 FETURH 
=15E43 REN#FFFFFFFFFEFFHRÜKODIL LAEUFT > gg 
=1S1E POKEK4r1.32:POÜHEE4+32792.6:FOHEK4: 5 
31523 E4=k4-1: IFE4I43FSTHENFOKER4+1 32:35= ze 
31532 FETUFN 
zzaaa FEMEEFEFFEFFFEEREBÜHUSFUHKTEFFFFFFFFEEH 
32018 FEINT"S"TABL1185" BEOHUS"SPCITS"ULORE PUHKTE" 
32615 FÜEKE3E373.15 
32425 FÜRD=15AT0Z2A3STEPE 
223939 ZU=IHNTCRHDG1#S+1) 
22043 IFZU=1THENFORTDISSHTIESTEF-2: POKE3E37E, D+D1: NEXT 
32045 IFZU=4THENHFÜRD1=S29TÜSSTEF-E: POKE3E375, D-D1 NEXT 
320559 IFZU=ZTHENFÜRD1SSTOZSASTEP-2: POHE3ESTE. D+D1:HEZT 
2553 IFZU=SSTHENFORDISATOESSTEP-2: PÜKE3ESTE, D-D1 NEST 
geia TIFZU=3THEHND=SD-Z 
8 NEXT:FOKEZESTE.E 
23293 FORI=1TO42:PU=PU+25:GOSUE39298 
323 PCOKE3S374, 1509: FOKE3S374.,5: NEST 
3 FÜKE3EST4,8:FÜRI=1T0509:NEAT 
32115 SE=SE+1:GOSUESHZ1E 
32125 POKE3E375.130 
32129 FORI=15TOGSTEF-1 
32146 D1=TD:FORDZ=I1TOGSSTER-. 75: FOKESESTS. DZ: NEXTDZ,D 
32159 POKE3ESTE.B:POKE3CZTZ, 15 
321209 PEINT"S"TREC11SI" "ESFLCII'N ° 
22203 RETURN 
32945 REMERARRERERFFRRBONUS ‚NAEHNCHENFRERFFSH 
32005 PÜKE35372,15 
35819 PRINT"S"TRBC1103 "ABONUS"SPCAIH"M E#TRA MAENNCHEN" 
RC FESTOFE:FÜRD=1T018: RERDH.L:NHEAT 
FÜHRE2E278, 135: FORD=SST015: FOERESESTS, D:FORD1=1T025: NEST 
FÜKE3E373.8:FORL1=11T025:NEXTD1. D:FOKE3SSTS.: 15 
sza FÜRD=1T018 
:3 READN.L’FORE3S378.N:FORDI=STOL :NEATOL,D 
3 TE=TR-1:G05UE35008 
FORI=15STOSSTER-1: FOKEIESTS,D: FORDI=1T02S: NEXT 
4 FÜKE3ESTS,E:FORTD1=S1T025:HEATDL.:D 
3 FÜKE3E3765. 2: FÜKE3EZT3.15 
=5 PEINT"S"TRE:1103"3 "SPEL14"'B ai 
2109 FETUFRN 
235059 RFENZFEFFFFEFFEFFEELNIAENNCHENÄHZAHLFFFFFTER 
25045 IFTRE=SATHEHFÜKE444S. 37: PÜKE4471, 37 
IFTRE=1THENPÜKE444S. ZU: FÜKE44 FL, FT 
IFTR=SZTHEHPÜKRE444S. 59: POHE4471,50 
= RETURN 
efeteie) REN###+#: 
sakaıl GOSUE 515) 
sasaz POKE3 3,3:FORT=1T020:GETAF:NEAT 
Sasas IFPUSHZÖRPU=STHENSBZER 
3515 FREINTSFELFI"RHERZLICHEN GLUECKWUNSCH"; 
zaaza IFPUF=H3AHDPUZHETHENHS=SFU:HIF="DREI" :GOT0565458 
20325 IFFUF=HEAHDFUSCHITHENHSESHZ :HE=PU:HIF=" ZWEI" P3FSPF2F: GOTOSOHSA 
saa43 IFPUSF=HITHENH3=HZ:HZ=H1:HI=SFU:HIF="EINS" F3FSP2FH:P2F=PlF 
sagst FEINHTSPFCCES"SIHE PUHNKTESTAHD 15T UNTER DEN ERSTEH DREI"; 


„aan FEINTZFESIO" RANG "HIF: 


Dr 


HE AEN Eee wi 
[Da Da Zr DSH De OR 


EEFFEFFEHÜECHSTFUHKTEAHLFFFFFE 


15 


nina 
DAX) 
2) 
ın 
ıTı 


Sasse GOZUESESHE 
age FEINTSFEESZIUTRGEBEHN SIE 3 INITIALEN EIN"; 


[2] TIr= KErREc 

u FÜRT=1T025:GETAF NEHT j 

Ei GETNI$: IFNLSTHENPRINTSPCK3SI"B"NI$".":GOT050108 

Ei PÜKE3E273, 15: FÜKEISSTE. 233 

u IFTIS="GSaa15" THENNIF=".":FRINTSPCSSSH EINE". "5 :GOT0S9190 


” 
it 


FÜHE3IE3TE:O 

SOTISABSE 

GETHEF: IFHZETHEHFREINTH2E". "5 :GOT0S3138 
FÜHRE3ESTS.: 1: POKEIESTE. 241° 

IFTI$="asaa25" THENNZEF=".":PRINTNZF". "5 :G0OT059138 
FIHEZEET 2, 

GOTOSE1EO 

BETH2F: IFH2ETHENHFRINHTHNSF:GOTOSE154 
FÜKE3E373, 15: FOKESSETE. 243 

IFTI$="asaaza" THENNSF=".":FRINTN3F:GOTOSS150 
ee 

45 GOLTOSE1LE 

Sa HF= hist" neN2g+", "+H3F:FÜKE3SS7E., 8 

2 GOSLUIESHEHM 

ra IFHIE="IREI"THEHPSFSNE 

73 IFHI$="ZWEI"THEHFEF=NE 

59 IFHIF="EINS" THENHPIF=NF 

E95 FENFFRFFFEEREFEEESFIELENDE+RÄNGFEFFFFFFE 

A225 GÜZLUEZ M:FÜFEZESTE, 

21a FEINHTSPEKZF3"SSPIELENDE"; 

k22a PRINTSPECSEP"RFEANGLISTE"SPOELE1SH "min 2; 
24a PRINTSFES4" AD „"PIE"."HL"PUHNETE"; 

Ze PEIHT"S"SFELISEH" EI „"F2E"."H2"PUNKTE"; 
SA2ES FRINT"SSPECISZISPCEZSI" A) „"P3E"."HI"FUNKTE"; 
SazrB FORT= 1To1aaa: NEXT 

azeB GESLUESET ne 


A A € 


zZ 
DD 


eG Den anlMenind 


bat 
(5 


a 
Fi) pen denk db ei fin di Jh Dh Dh Gun duch find Guuch unch Dub DT) ATI NT N) A N) N 


MLMLMENLNLALALALNLALNLNLALANLALALnEnInIaKLAcLaıNn 


Br) 
> 


— 
a! 


xaLnininıd 


ıS 
N. 
in 
ıC 


>gz253 CH=E:T=9: ea: A=b:N=6:U1=0: Tl: 53=0:52=0:51=0:59=0: 50: KAle0: ZB: Ziel 
Sazs5 Ml=R: NEO HO=0: ZT=d:Leb se" HIF=" "NEE" N2S=" "NIE" NE="" Ka: Kl=0:K 
2=3 

Sazcr7 Kl=2:59=0:E4e0 

242359 FORT=1T01059:GETAF NEST: GOTO7S 

Saas REMEFFERFFFEERFENUSIE LEREREREEFEEEEE 

sa519 POKE36373,15 


4315 FORT=1ITNZ 

>32289 FÜRW=14AT0249: PÜHE2E3765, NW HEAT 

SE525 FORT1=1T02 

Saszs FORU=SZI4ATLIERESSTEP-1:POKE3E376.,W:NERXTW, TI 

sassa FÜRWUSZERATOL39STEPF-1:FOKE3E376:N:NEZTU,T 

53249 FÜRU=S1STIGSTER-. 1: FÜKE3S3753, W:NEXT :POKESSETE., & 
RETLUFH 

FENSERFTFFLERFELENUZIE SEEFFEFEEFFEHHEEE 
FOKE22:373.15 

FÜRT=1T02 

FORU=SZ4ATO14ESTEF-1:FÜHE3SS76. WM: NEHT 

FÜRT1=1T0E 

FORU=SZ3AT0249: POHE3S3T7E,W'NEATW, TI 

Sas23 FORH=13BHTOEAB: FÜHE3ESTE,W'NEATU:T 

Sa635 FÜRU=SZ4ETLIIESSTER-1:POKE38376, WM: NE® 

ba 120 1) an 15STO85TEP-. 1: FÜKE3E375. W'HEAT :FOKEZEETEG, A 
SgE50 FETURH 

2 RENFFFFFFFEFELEAESCHLUSSMELOTDIEFFFFFH 

45 RESTORE 

15 POÜKE3E375.159 

25 FORT=SZ2ST0EASSTER-.S:FÜKEISETE, T:FÜKE3SE7S, T+25:NEAT 
2738 FÜRT=1TOIM:FREADN.L 

sar4g POKE3ESTE.N: En H+2S 

Sa758 FOÜRU=LTÜL:NEST 

Ssar7esd NEST 

59779 FORT=Z3£TO123STEP-1:PÜKE3557E.T:POKE3E375, T+25: NEAT 
sar753 FÜRT=1STORSTER-.1:POKE3S373, T:NEAÄT :POKE3SSTE, 8: POKE3ET73: 8 
sa? RETURN 

53233 REMKFFFEFEFFEREFENUSTEDATAOFFERFFERFRREETR 

Ssaag DATA2R2, 320, 204. 300,206, 300,9. 100, 2065. 308,0, 100 
s3341 DATAZ10, 2009, 2065, 200, 203, 200, 206,300 

saaaz DATA13S,195,199,50.0.25, 199, 59,0,25. 199,50. 0.25,195, 50, 193.59, 203,159 


16  Compute mit 


N 


DE u Dr en! 


ı 


gacacacniainın 
HManAmahncen 


De} DE TEEN 
Ti 

N Data Riem oe in 
3] 


MIANLALAENLN\, 
DETEKTEI 


E 
5 
5 
E 
z 
£ 
= 
[er 
= 
= 
Le} 
E 
E 
= 
Lei} 
= 
Kr 
E 
£ 
= 
Eu 
6 
E 
E x 
£ 
£ 
£ 
E 
E 
E 
& 
& 
5 
= 
= 
[= 
£ 
E 
£ 
E 


FENLEFFEERRFFFEFFZEICHE 
IATAS,3,19.8.2 
DATAG,0,43.24,129, 45.1 
IATA?E.132.8 
DATAG.8.12:. 24:29, 12,5; 
IATR24.24,659.80, 182 
IATAZ4. 2 


Do 
N ER 


md 


az a N 
- 
De 
Da 


Do) 
eb 


"Jin Bidd) 


u Be 9 De a Tee} 
" 4, 24 PL 


1 az 1 


IATA2SF: 2 
IATHZS, 42, 
IATRA.0,9, 
DI Bere, 
IATAG,0.8, 
IATA9,8,.0 
IATA9.9,0 
DATAG,D,E5 
IATALZ3, 
IATAG. 24. 


,62,1 
ar 
.9,10,8, 
1,0,0,.0.0, 


or 
z 
ADAM 


-, 
a! 
u 


.e vd = DT 


Da) 


a0 49,4: 
5,65,8,0: 
120.248, 112.3 


az a ne 


& 
oe 


Eu - 


A 


5 
I, 


IATAG.3,122. 
IATA3.9,.0, 5 
IATAA.M.G, 


1229.85. 66, 

255 125 
‚12: 154, Se 
DATA231.281..195, 165, 195 
DATH24.24.22,.399,659,.153 
ee ee 
a 


ME a NE 


DATRIEZ. 192.7 Et 

IATASZ, 113.35 39.3 
IATA17.51,33, 42: 
DATAZS, E23, Sa.,124.5, 128. 
IATAS,9,.259,9,09,55. 0.0 


[oe Du 9) 


= 
me ammı 


ar 
B 


ı 9 15 3 
be} Dr] 


nenn 
Ta 


ar 
a! 


SCHLUSS mit dem unproduktiven Stöbern 
in überall herumliegenden Programmier- 
unterlagen. 

SCHLUSS MIT FRUST UND ZEITVERLUST! 

Von einigen hunderttausend VC20- und 
C64-Besitzern sind nur wenige bis zu 
Sound und Grafik vorgedrungen. 

DAS SOLL SOFORT ANDERS WERDEN! 

1. Dinkler, Idee-Soft, Am Schneiderhaus 7, 
D-5760 Armsberg 1, Tel.: 02932/32947 


»2:6:.209,.5 
48.965. 04.04,96,12 8.108.228. 2 


‚ 1H2.920,90, 25%: 
er 26,95, 24, 


ba 


IATAZ4. 24.650.609, 2599, 295 33,833 


‚Ed [2 15,295.255.255, 239, 


25,50.62.127 


u 
[= 7) 


HIATAFFFEFFFEEEEER 
a 
5,45,1209,124,252, 196, : 


60,54,35 


=,125, 12 


2, >0,50. [7 Br 12. ’ 
=,233,16 


ec TmEee‚R 
mE IMEIISE u De 7 re Du FI 


me 


- 
we ) 
eo „oe 


Dr Ir DL = Ir} 
Er: 233,93.1 


127.22, 24,594, 24,3 
33, es 3] 
+2 " 52,2 ‚E, 127 +, 23 


BE, 
1,9,0,23,42,682:25 


. ‚29,90, 153. 153.123, 123,129,25.0,0.0,08 


59: 213, 219,29, 24.0.0.0,.0, 6 
4,22.32, 20. 20, Be 
21,0, 9: 9,2,0,850 665 129,18 
2,32,176,241,121,392 20 28,5 


IATAH, A, A, A, a, a, 9,3,24,8,0, d, 2,0,2,M 


[aa PR =15 Pipe Are BB are 0 5 FPE 5 PR 5 PR 5) 


‚133.153, 26,265.0,09,9,.0,0.8 


‚245,249, 112. 32:8,0.9.0,0 

4.31:.15,14.9:.0,0.0.0.0 
‚152,16.137,211.74.16:137,2 

‚239, 112.44.15 ‚1.853, 


a EIERN IE 


Ir 


33, 113.62: 
119, 142, 192,0 


20, 


FERIEN & 


Swirt 


C-64 — OBERSEITE 

50 BASIC-Begriffe. Ausgabezeichen für Zeichenfarben, 
F-Tasten, Cursor, INST/DEL und CLR/HOME. POKEs für 
Bildschirm-Rahmen, -hintergrund, -positionen, Zeichen- 
farben, Sound (3 Stimmen, Geräusch, 4 Oktaven). Feh- 
ler. BIN/DEZ-Umrechnung. Uhrzeit. 18 Floppy- und 
Druckerbefehle. Hüllkurve, Welle, Filter, Notenwerte. 
— Stevertastenerläuterung. Sprite-Pokes. 

RUCKSEITE: Felder, Edier- und Formationskomman- 
dos. Logische und Rechenoperationen. BIN/DEZ/HEX- 
Tabelle. Ungeeignete Variablen. Bildschirm-, ASCIl- 
und CHR$-Codes. Scrolling-POKEs. Sound- und Grafik- 
Demoprogramme. Sprite- Data-Tafel. 


Computbe mib 


SF 


224.132.64, 


211,2 
112.44. 24,2: 


ec ame - 
2133 22 EA EEE 


BE, 12, Be. 


zug EEE 239 
„eo 


-.. 
[ u te 77 Fehr Pipe Fiber 24 2 [a Du 57 39 


29,33 


1» 
„a 


Ins 
RS 


ER 
KURE 


KESFORE 


RETURN 


» 
SAIR 
=> 


Vc 20 

Wie C 64 ohne die für diesen geltenden Beson- 
derheiten. Dazu: Farbentabelle für Bildschirmrah- 
men und -grund. Speicherorganisation. 
COMPUmask zeichnet sich aus durch guten Sitz, 
abrieb- und reinigungsmittelfesten Mehrfarben- 
Kunstdruck in Hi - RES unter flexiblem, reißfe- 
stem Edelkunststoff in computerdeckenden 
Maßen. 

Erhältlich in allen Fachgeschäften zum Preis von 
ca. DM 30,-. Für Liefernachweis genügt Post- 
karte oder Anruf. 
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WEDOLEONTUTE 


Destroboit 


ür den VG-20 Grundversion 


Außerirdische . Mächte bedrohen die 
Sicherheit des gesamten Planeten. Kos- 
mische Sporen, die von den Fremdwesen 
gesät werden, entwickeln sich im Laufe 
der Zeit in weitere Ungeheuer, die sich 
dann ebenfalls an dem Eroberungsversuch 
beteiligen. 

In Ihrer Hand liegt es nun, die Bedrohung 
mit Hilfe von drei leistungsstarken Plas- 
makanonen abzuwenden. 

Zielen Sie damit auf die Angreifer, be- 
denken Sie jedoch, daß der Kontakt mit 
den Sporen jeweils eine Kanone zerstört. 
Viel Glück — Sie werden es brauchen! 


Steuerung: 

'<' = nach links 

'>' = nach rechts 

<' = Aktivierung Plasmakanone 
'F1’ = Spielstart 


Links oben befindet sich die Punktean- 
zeige. 
Rechts oben befindet sich die Anzahl der 


ıZ 


FÜKE: 
Re 3 


Zi 


Dame Lie 
DC EEE) 


IATAB,8,255 
IATREG.©5.1 
DATAG, ES. 2 
FREIHT"TIaBBl 
FREIHT" Ze 
FEIHT"'R 


EEE A 


fe fra PS Pl m m ne 
Ten a a an a a a I 


FREINT"A .“ 
rm" 
FÜHESSL.1S1:FOEELSS,1 
EHI 
FEINT"TI" 


Fifgpapın) 
m 


m 
Gammını 


:FOKE3SS72, 25 


win 
Da 
zu 


FREIHT' SISIFAA 


Da} 
in 


PREIHT"A HI DI HEBT WI hl 
FREIHT" ARTTTT ul „abi 


L) 
= 


Da 


mn 


FETUFH 


:FREINTTABLZEN'B P. 
[21 1 Bus 1 Base 7 a | Be 
nu hi bi 


yabbbnbml nn Mi a Abb Kubhabe 
FEINT"SBBBI hl DI Di Hi Ib Fabia 


Angreifer. 


-Bonus 5000 Punkte bei Eliminierung 
aller Angreifer. 
- Höchstpunktzahlanzeige bei Spielende. 


Programmaufbau: 

Das Programm besteht aus zwei Teilen. 
Teil eins: 

Zeile 20: Reservierung von Speicherplatz 
für neudefinierte Zeichen. 

Zeile 30-70: Übertragung der Zeichen- 
datas vom ROM ins RAM, sowie Definition 
neuer Zeichen. 

Zeile 80: Neue Bildschirmgröße wird 
generiert. 

Zeile 250: Teil zwei wird selbständig 
geladen. 

Teil zwei: 

Zeile 50-100: Hauptschleife- extrem kurz 
gehalten, um möglichst hohe Geschwin- 
digkeit zu erreichen. 

Zeile 300-310: Festlegung der UFO- 
Bahnen. 


‚1532: FOKE3EST7 


3,8:FOKRE2ESESP. 


ne: :TRÜORÖOLAT" 

F.E. ZUFTUARE 12904" 
“ERHNICHTEH SIE DIE 

FREINT"BEYÜR DIE COSMITSCHE SAAT 

= HACH FECHTS 9 


EU MACHSEN BEGINNT" 
= NACH LINES 


EÖHFAUER SOFTURRE A 
DI BE DE HI DB MI BE BEE 
1 De 1 Eu 1 1 50 1 1 00 1 Eu Bu 1 


Compuhe mik 


Zeile 350-375: Überprüfung auf Sporen- 
kontakt. 

Zeile 500-510: Getroffene Kanone. 

Zeile 600-610: Überprüfung der Steuer- 
tasten. 

Zeile 700-720: Getroffene Ufos. 

Zeile 780-820: Ausgabe von 'gewachse- 
nen’ Sporen. 

Zeile 900-920: Bonusanzeige. 


Variablenliste: 

MO = Anzahl Ufos 

HP = Punktevariable 

TR = Variable für getroffene Kanonen 
D1/D2 = Variablen für Sporenposition 
$1/82/S3 = Variablen als Ein- und Aus- 
schalter von Funktionen benutzt 

$4: Variable für Schußmöglichkeit 

X = Horizontalvariable für Kanone 

Z = Vertikalvariable der Ufos 

Alle anderen Variablen nur für Wiederho- 
lungsschleifen gebraucht. 


1 REM" 8° = CURSÖOR HÜME 

2 REM" m = CURSÜR NACH RECHTS 
> REM" 1 = CURSOR NACH LINKS 
4 REM" “a = CTRL CH 

5 REM" 4" = CTRL RED 

5 REM" 5° = CTRL BLU 

? REM" “4° = CTRL PUR 

5 REM" “m = Fi-TASTE 

7 REM" "m = CURSÜR NACH UNTEN 
18 REM" 1° = <SHIFTI E 

11 REM" 777_° = (SHIFTI DEF 


254: FÜKEFESET,S 


FEINDLICHEN IHYASOREN, "5 


“= F 


FRAESEHTIERT 


au 
za 


IL a 


ı 
on 


GE GOTIN BE NDG 


KO EEE RE RE ER IE IN 


A en DE Een Ku ie dı Ber 


DE NE HE N N 5 


oz 


OT A CH Ch cn Ch 


Race fl IS LIND (7 DR EEE) 
= 
I 


= ji 


LR 

FEINT"7":FOKE35573, 15: HP=2304: POKE?8S, 134 
FÜRESSSTT.M 
FÜRT=3250871033743: FÜKET, IS: NE#T:FÜRT=38750T038774:POKET,5:NEAT 
FEIHT"SAITIIIIIDESTRÖBÖLT III I I 1 1 1" 

FEINT"S"TAECIFFO"ARUM START Fi DRUECKEN"TABC174)"E 
FEINTAIIISTISSESDESSTTADEIERINN" 

FEINT"S"TABEZ2EH HDECHSTFUNKTZAHL : "HP 

GETAF: IFR$Z>" mw" THEN3S 

FRINT"S"TAEC177:"8 "TABASO>" 
no=18:4=11:5=1:51=0:52=8:53=0:54=0: PlÜl=d: 11=6:D2=6: TR=Bd 
FRIHTSAPIBBBBBEFLNKTE: IEBHURRI' PL 

FEINT"A"TAB(ES>" UFOS: IBal" 1): POKESEST?7., 254: GUSUBEBO 
IF==1THENGÜSUE3GS 

IFS1=1THENGÜOSUE3SE:FÜRESB31+R. 63 

IFSZ=1THENZ4 


3 LOTUSG 


A=&-1: IFACOTHENA=E 

FÜKESO3U+4 , 63: PÜKE2031+4, 63: PÜKE3G32+%, 76: PÜKE8033+%, 32: RETURN 
S=ßtl: IFADZZTHENA=S22 

FÜKESE38+% , 62: PÜKESB31+4, 63: PÜKESG32+K, 78: PÜKE3H29+% , 32:RETURN 
Z=INTERNDE 1805 425+77209 

FÜRU=ZTÜZ+24: FÜHREN, 65: FÜKEN-1, 32: IFU-Z=KX+1 THEND1=U+25: D2=80831+% 
DÜSLUEESE: 54=54-.5: IF53=1THENS3=B:GOTO318 

NEAT :FÜKEN-1,32 

5=0:51=1:RETUFRN 

PÜKED1.£7:D1=D1+25: IFDI>DZTHENS1=0:5=1 

FÜKERBSCDI-395,32 

IFPEEK< DI >=SESÜRFEEKKDIISEIORPEER II 3=7ÖTHENGÜSUBSEO 
IFPEEK«D13=65STHENGOSUESUS: GOTOS7B 

IFPEEK<T13=S1EMTHENGOSLUB?3A 

IFPEER.<I13=7ZTHENGISUB7SO 

IFD1>DZTHEND1=6:D2=8 

RETURN 


a FÜRF=56866+#T07751+#STEP-25: FÜKEF . 71: POKEF+25, 32: POKEF+30728, 3: POKE36575, F/33 


IFFEEESF-255=&5THENFU=SFU+S88 : PFORKE36375 .8:60T0798 
NE#ZT 

PÜk EF+2S,32: Fü E?3 ur 
PÜKEI1,32:FÜKEDI-25.: 
TR=TR+1: -FÜRT=2S5ATO1435TEP-1:POK 35377, T:HEXT: IFTR=3THENSZ=1 : IFPUF>HPTHENHF=PIJ 
FETURHN 

GETRE: IFA$=", "THENGISLBZOS 

IFA£=". "THENGÜSUEZZO 

IFS+:0THENE1O 

IFA£="«e" THENSÜSLEISS 

RETUFRH 

FÜKEN, 73:PÜKEF. 32: FÜRT=S259T02255TEP-1: POHRE38377, T:HEST :POKENU. 74: FORT=286T015 
TEP- 1 

FÜKE3E377,T: NEXT: :MO= =10-1: IFMOZ=STHEHSÜSUEISH 

FÜHEN, SE: FÜOKE: v.254:53=1:60T0429 

FÜHEDI-25,.32: FOKENL- 125 
FÜRG=1T03:FÜRRSZSETÜZERSSTERF- 12: FORE2ESTE, FR: HERTRE.C:PÜKE3ESTE. Ei 

FETUFH 

PÜREII-25, 32: FOKEL1,85: FOR T=1T03:605UB7S5:NEZT : RETURN 

FÜHEII-25, 32: FOKEL1. 65: FORI=1 103: G605UE7S5:NEAT 

H=3: FÜR J=I1-25T001-25293TEF-25:PÜKET, 665: FÜHE3S274 , 159+H :H=H+19: POKET, 32: NEST 
FOkE3EST4. 0: POKEJ. 32: MO=MO+1 :FOKEDL, 72: RETUFH 

FEINT"S" TREE 1S4"EOHLUS: Gas PUHKTE" PÜKE3SSTT,E 

FIRC=125 70250: PÜKE2E376. CC: FÜKE2E375, C+2: PÜRE3E374.6+4 HEHT : FOKESSSTE. A: FPOKERZ 
- a) 


FÜRE3EZT4. 0: Ml=10: PÜ=SFU+5ESE: FEINT"S"TAB©1S4>" ":RETURH 


5:54=1: RETURN 


Compute mik 


AD 
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Hot Stones 


für den VG-20 Grundversion 


Zu diesem Spiel schreibt uns der Verfasser des Programmes: "Bei Grundversionsprogrammen für den VC-20 
störte mich schon immer, daß das Programm in mehrere Teile zerlegt ist, obwohl der Speicher lange nicht 


ausgelastet ist. 


Deshalb schrieb ich das Programm HOT STONES, es nutzt den Speicher des VC-20 voll aus. Es ist kein 
billiges Abschußspiel, und für Basic relativ schnell.” 


Das Programm kann mit Tastatur oder Joy- 
stick, wobei dieser in Maschinencode ab- 
gefragt wird, gespielt werden. 


Spielbeschreibung: 

Sie selbst werden als Raumkapsel am un- 
teren Ende des Bildschirmes dargestellt. 
Ihre Aufgabe ist es nun, durch ein Gewirr 
von Gesteinsbrocken heil durchzukom- 
men. Ihre Aufwärtsbewegung kann nicht 
verlangsamt werden. 

Bei jeder Bewegung nach oben erhalten 
Sie 15 Punkte, zur Seite 6 Punkte. Nach je- 
der bestandenen Runde erhalten Sie 180 
Punkte und kommen automatisch in den 
nächsthöheren Level. 

Bei Kollision mit einem Gestein ist das 
Spiel verloren. 

Die Tastatur wird aus dem Programm 
ersichtlich. 


REMOTE 


REM HOT STONES % 
REM#* <C)BY J.BAUR %* 
REMx * 
REMxk * 
REMx 

REM%# 1934 * 


FREEMMK 3% ak a ak ak ak ak a ak ak ak ak aka ak 


nPWNM- ONSD U PUT - 


Ss® REM+%* DEF.ZEICHEN xx 


L=365878:POKE658,18:POKE657 


Solange das Programm nicht richtig läuft 
ist es empfehlenswert, in Zeile 20 den Be- 
fehl POKE 788,194 zu entfernen, da dieser 
die RUN/STOP-Taste ausschaltet. 


Programmaufbau: 

10-30: Betimmung der Variablen 

40-90: Definierung der Zeichen und Poken 
des Joysticks 

100-130: Festlegung des Anfangslevels 
140-160: Vorbereitung des Bildschirmes 
fürs Spiel 

170-190: Bewegung nach oben; SPIEL 
200-250: Abfrage der Tastatur und Joy- 
stick + Bewegung zur Seite 

300-340: Kollision mit Stein; Kapsel 
zerstört 

500-570: Runde gewonnen 

1000-1090: Bei Tod (Zerstörung) Wie- 
derholung (neues Spiel?) 


‚123:POKEL,15:POKEL+1,118 


12) 
8 P=11:POKE783,194:TA=1993:J=8528: JA=251:JF=252 
a Si=L-4:52=51+1:53=-52+,:54=53 +1 

8 IFPEEK<(71798)=135THENI188 


S5 PRINTCHRS<14797SPC(66) "FEINEN MOMENT BITTE !" 
- 68 FOKESS ,28:FOKES2 ,28:POKES1,PEEK (55) 


65 CS=-256H+2S+PEEK (51) 


78 FOR1=CSTOCS+5S11:POKEI,PEEK(1+32768-C5):NEXTI 


75 FORI= 
sa REM+%* JOY-MASCH xx 


71685T07168+47:READJ:POKEI,J:NEXTI 


85 FOR1=-3235T0328 +34 :READJ:POKEI,J:NEXTI 


38 RUN 


12a POKEL-3,255:C7TSUB22QAO:REMAKx TITEL *%* 


118 FOKETA,B:=:PRINTCHR&<1479>7SPC(67)"m LEVEL 


128 GETAS$: IFAF=""THENI12Q 
1323 A=VAL (AS): 
140 REMAxKK SPIEL Krk 


SR Sat 17 us 


IFA<1ORA>STHENIEDO 


Compube mib 


2000-2080: Titelbild 
5000-5090: Daten für Zeichen und 
Joystickabfrage 


Varlablenliste: 

I: Lautstärke 36878 

TA: Tastatur 198 

J: Joystick (SYS) 828 

JA: Joystickabfrage 251 
JF: Joystickfeuer 252 

$1: Stimme 1 36874 

$2: Stimme 2 36875 

$3: Stimme 3 36876 

$4: Stimme 4 36877 
c$,1,X,0,01: Hilfsvariablen 
A: Level 

R: Runde 

p: Position der Raumkapsel 
$C: Score 

HI: Highscore 


ANNE 


145 POKEL+1,125 

1590 PRINTCHRS$S(C147):R=R+1:POKETA,B:POKES1,289:POKE38334 +P ‚„2:POKEP+8164 ,1 
168 POKES1,8:FORT=1TOAx18:H=INT(CRND(1)%*396) :POKEH+33499 ‚,B:POKEH +7688 „2:NEXTT 
1708 POKESZ,E2B81:POKEP+3164,3:POKEP +388384 ,5 

159 P=P-22: IFPEEK (P+35164)=2THEN3B® 

150 POKEF+8164,1:FOKEP+38584 ,2:3POKESZ2,9:5C=SC+15 

155 REM+BEWEG-ABFR%* 

eat PE=PEEK(137):5YSJ: IFPE=330RPEEK (JA) =14BTHENPI=-1 

elß IFPE=3SSORPEEK <JAI=23THENPI=1 

229 IFFI<DOTHENPOKESE ,2A9:POKEP+8164 ,3:POKEP +38834 ,5:P=P+Pi 

258 IFPEEK<P+8164)=2THEN389 

248 IFP1<>BTHENPOKEP +33884 ,2:POKEP+8164,1:POKES3,9:P1=9:5=S+6 

258 IFP<-43E2THENSOR 

255 IFSEC>HITHENHI=SC 

262 FRINT"SBEPUNKTE"SC" HI: "HI 

270 GOTO1?rO 

389 REMx#* ZERSTOERT x%* 

318 POKES1,8:POKES2,8:POKES3,® 

328 FOKESS3,2193:FORI1=15TOBSTEP-.S:POKE36865,34:POKEL, 1I:POKEP+338384 ,7:POKEP+8164,4 
338 POKE36865,38:POKEP +33534 ,2:POKE8164 ,5:NEXTI:POKES3,® 

348 POKEL,15:60T01008 

5932 REM&k* RUNDE GEW. xx 

Ss85 SC=-Sc+lE9:A=Atl:POKEL+1,119:POKES2,® 

518 PRINTCHRS&S(147)7SPC(66)"m DU ERREICHTEST BIS M JETZT "SC"PUNKTE" 
Ss29 PRINTSPC“44)3"2DA5 WAR DIE "R"IL.RUNDE" 

SE5S PRINTSPC 22)" LEVEL:"A 

538 FRINTSPC{45)"34 DRUECKE TASTE * 

548 FORQ=1TO2:FORQ1=-298T0255:POKES3,G1:NEXTG1,Q:POKES3,® 

ss9a FORQ=ITCS:POKES4 ,288:FORQ1=1T028:NEXTQ1:POKES4,,8:FORQ1=1T0OS5O 

S55 NEXTQ1,Q:FOKETA,B:P=11 

SED SYSJ: IFPEEK<TAIORPEEK CJF)=BTHENS?® 

565 GOTOSEB 

578 POKETA,9:GOTO148 

1888 REMx%* WIEDERHOLUNG x*%* 

1818 PRINTCHRS(C147)3SPC (66) "MEDAS WAREN ZUSAMMEN" :PRINT" "SC" PUNKTE" 
1815 PRINTSPC (223 "BEI LEVEL: "A 
1828 IFSC>HITHENHI= 

18398 PRINTSFPC<22) "BISHER BESTES ERGEBNIS"HI:POKEL+1,11®8 

18498 At="fj MEUES SPIEL ? ":FORY=1TOLEN(AS$) 

1845 PRINTCHR&<C1SI, TABC241)" "57 MIDECAS,Y, 1) 

108598 PRINTCHR&(19); TAB (228)* "ZCHRS$(2B) 

1869 GETES:SYSJ 

1078 IFB&="J"ORPEEK (JF)=BTHENR=B:P=11:5C=8:POKEL-93,255:G60T0119 

1888 IFB$="N"THENPOKE788,8 

1938 NEXTY:GOTO1848 

29888 REMx%* TITEL xx 

2818 PRINTCHRS<C147)" HOT STONES " 

2828 PRINTSPC<22)"g 03 1984 BY J.BAUR* 

2938 PRINTSPC<(44)"ZWERSUCHE DEINE RAUM- BKAPSEL DURCH DAS GE-" 

2848 PRINTSFC(CZ2I"SWIRR VON STEINEN HEIL BPURCH ZUBRINGEN I!" 

29858 PRINTSPC (44) "3S5STEUERUNG: ":PRINT"IX2Z< >C> ODER JOY * 

2368 PRINTSPC(434) "3 DRUECKE TASTE":POKETA,® 

2a728 SYSI:IFPEEK <TA><YBORPEEK (CJF)< >32 THENRETURN 

2839 GOTI2079 

Ssaot FEMAZEICHEN-JOY DATAS« 

Ss818 DATAEB,66,185,161,161,185,66,608 

so22 DATH24,60,36,930,68,60,99,24 

5939 DATA4,14,62,62,63,126,68,12 

5348 DATA12S,9,49,24,24,90,80,129 

>9a59 DATA32,24,157,254,145,281,132,8 

Ss2EQa DATA165,24,193,248,137,9,154,8 

5978 DATA169,127,191,34,145,173,32,195,91,128,133,251,169,255,141,34 
seosa DATA145,173,31,195,41,23,24,101,251,133,251,173,31,195,41,32 
5832 DATA133,252,96 
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Textverarbeitung 
w 
mit dem 6-64 
Das Microcomputer nicht nur zum Spielen geeignet 


Sind, ist inzwischen auch den eingefleischtesten 
Computergegnern bekannt. Das Spektrum der Heimcomputer-Anwendung reicht von einfachen 
Haushaltsprogrammen bis zur komplizierten Buchungs- und Kalkulationssoftware, ja selbst 
wissenschaftlich-technische Auswertungen können aufgrund der revolutionären Entwicklung der 
Microchips auf Heimcomputern durchgeführt werden. Doch an dieser Stelle soll als Anwendungs- 


beispiel die Textverarbeitung besprochen werden. 


Wie leistungsfähig ist die 
Textverarbeitung 
mit dem G-64? 


Zunächst einmal muß gesagt werden, 
daß Textverarbeitungsprogramme für 
den C-64 in der Preislage von ca. 100,- 
bis ca. DM 200,- DM im Handel erhältlich 
sind. Vergleichen wir diese Zahlen doch 
einmal mit einer Textverarbeitung auf ei- 
ner Business-Maschine. Hier dürfte der 
Preis für die Software ca. das 10- 
20fache ausmachen, jetzt die Frage nach 
dem Preis-Leistungsverhältnis, denn ei- 
nige Textverarbeitungsprogramme auf 
Microcomputern brauchen den direkten 
Vergleich mit erheblich teurer Software 
der Großrechner nicht zu scheuen. 


Was kann ein Textver- 
arbeitungsprogramm? 


Das Eingeben, Löschen und Ausdrucken 
von Texten ist die einfachste Form der 
Textverarbeitung, doch bieten heutige 
Programme weitaus mehr Leistung. Ei- 
nige Hilfsroutinen wie z.B. das Editieren 
im Bildschirm, das Abspeichern und wie- 
der hereinholen der Texte von Datenträ- 
gern erleichtern die Arbeit wesentlich. So 
kann der einmal geschriebene und ab- 
gespeicherte Text jederzeit wieder auf- 
gerufen, verändert und überarbeitet wer- 
den, bis er schließlich druckreif auf Pa- 
pier kommt. Dies muß allerdings so 
komfortabel und einfach wie möglich zu 
bedienen sein, sodaß auch Laien mit den 
Programmen arbeiten können. Die größ- 
ten Leistungsunterschiede bei Textver- 
arbeitungsprogrammen gibt es beim 
Editieren. Einige Programme sind schwer 
zu bedienen und selbst kleine Schreib- 


22 


fehler können nur sehr zeitaufwendig be- 
seitigt werden. Das A und O einer ver- 
nünftigen Textverarbeitung ist nunmal 
der Editor, denn Fehler sind schnell ge- 
macht und müssen ebenso schnell wie- 
der beseitigt werden. 
Folgende Editormöglichkeiten sollte je- 
des Programm haben: 
— Überschreiben einzelner Buchstaben 
— Einfügen und Löschen einzelner 
Buchstaben 
— Einfügen und Löschen ganzer Wörter 
— Einfügen und Löschen ganzer Sätze 
Diese Funktionen sind Grundlage der 
vernünftigen und sinnvollen Textverar- 
beitung, doch bieten einige Programme 
standardmäßig vi&l mehr: 
- das Verschieben ganzer Textblöcke 
— das Kopieren ganzer Blöcke auf einen an- 
deren Teil des Dokuments 
—- Suchen von bestimmten Wörten oder 
Sätzen 
- Ersetzen von bestimmten Wörtern oder 
Sätzen 
Das eröffnet eine Fülle von Mög- 
lichkeiten in der Textverarbeitung, ein- 
mal geschriebene Briefe können beliebig 
verändert oder standardisiert werden, 
das alles auf einfache Art und Weise bin- 
nen kurzer Zeit. So ist z.B. das Verfas- 
sen von Rundschreiben kein Problem, im 
standardisierten Dokument werden ein- 
fach nur die Adressen ausgetauscht, 
dann direkt auf dem Drucker ausgegeben 
oder auf Datenträger gespeichert. Viele 
Textverarbeitungsprogramme auf Klein- 
rechnern machen das genauso gut + 
Schnell wie die wesentlich kostenintensi- 
veren auf Großrechnern, als Beispiel für 
komfortable und billige Textverarbeitung 
steht der C-64. 
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Textverarbeitung 
auf dem 6-64 


Schon rein optisch bietet sich der C-64 
für die Textverarbeitung an, die hervorra- 
gende Tastatur läßt auch für geübte 
Schreibmaschinentipper kaum Wünsche 
offen. Lediglich die amerikanische Ta- 
stenbelegung (QWERTY) mag hier eine 
Ausnahme sein. Die programmierbaren 
Funktionstasten sind ebenfalls sehr 
nützlich, weiteres Plus ist der hervorra- 
gende Editor, da mit dem Cursor über den 
gesamten Bildschirm gefahren werden 
kann. Ton und Farben können für die Auf- 
gaben der Textverarbeitung auch genutzt 
werden, etwa Warnton bei fehlerhafter 
Eingabe oder farbiges Untermalen 
wichtiger Textstellen. Doch viele Text- 
verarbeitungsprogramme nutzen die Mög- 
lichkeiten des C-64 bei weitem nicht 
aus, viele Programme sind auch von 
größeren Commodore-Computern über- 
nommen worden. 

Allgemein gilt hier, speziell für den C-64 
geschriebene Textverarbeitungspro- 
gramme sind wesentlich komfortabler 
als Rechner-kompatible Software. Der 
große Unterschied zu den sogenannten 
"Großrechnern” liegt beim C-64 im Bild- 
schirmaufbau, lediglich 40 Zeichen/Zeile 
können dargestellt werden, während bei 
kommerziellen Rechnern 80 Zeichen/ 
Zeile verfügbar sind. 

Der Vorteil der 80 Zeichen ist die kom- 
plexe Darstellung von Dokumenten auf 
dem Bildschirm, da auch auf dem 
Drucker 80 Zeichen/Zeile ausgegeben 
werden, somit eine Bildschirmzeile auch 
einer Druckzeile entspricht und nicht erst 
beim Druckvorgang "formatiert" wird. 
Eine andere Möglichkeit der Bild- 
schirmdarstellung ist das “Textscrol- 
ling”, der Text bleibt in 40 Zeichen/Zeile, 
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MODEL 


C64/IEEE-488 COMMODORE 64 
Steckmodul 


Dieser ausgereifte, weltweit erprobte IEEE-488-Modul eröff- 
net dem Commodore 64 über seinen parallelen Ausgang 
ungeahnte Einsatzmöglichkeiten wie: 

große, IEEE-kompatible CBM-Peripherie am C-64, simulta- 
nen (seriell - VC/paralleler - IEEE) Datenverkehr. Konflikt- 
freie, speicherverschiebliche Modulsoftware. Im Einsatz bei- 
spielsweise in Schulen ermöglicht der IEEE-488-Steck- 
modul problemlose Mehrbenutzersysteme am IEC-Bus wie 
auch durch die rationell genutzte Peripherie: z.B. zahlreiche 
Computer an einer Doppelfloppy. 

In der Industrie bietet der IEEE-488-Steckmodul 

die Möglichkeit für preisgünstige IEC-Meß-/Steuersysteme 

mit dem Commodore 64 als Controller. Zu diesem Modul wird 
ein Betriebshandbuch geliefert, in dem Beschreibungen zu 
fast sämtlichen Anwendungsfällen mit Programmbeispielen, 
Belegungstabellen, Angaben zum erforderlichen Kabel- und Steckermaterial, Literatur = 
etc. aufgeführt sind. Zusätzlich können zum IEEE-488-Steckmodul Anwendungs- ll 
hilfen wie u.a. Disketten mit Lesekennzeichen, Utility-Disketten usw. bezogen werden. 
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_ BETRIEBSHANDB a 


te-wi Verlag GmbH 
IEEE-Steckmodul für Commodore 64 Theo-Prosel-Weg I 
einschließlich Betriebshandbuch DM 239,—— inkl. MwSt. 8000 München 40 


NEU! C-64 Computerhandbuch 
Ein Handbuch für jeden Erfahrungsstand: von 
der ersten Begegnung bis zum professionellen 
Einsatz des COMMODORE 64 bzw. 1541. Das 
Werk ist sehr bildreich und bietet somit eine 
schnelle Übersicht — als echtes Nachschlage- 
werk werden Sie es stets in der Nähe Ihres 
Computers finden. 

Raeto West. ca. 400 Seiten, Softcover. 

DM 56.-—. 4. Qu. 84 


CBM Computer Handbuch 
Dieses unentbehrliche Nachschlagewerk bietet 
eine wahre Fundgrube — mit einer schrittweisen 
Einführung bis hin zur Darstellung aller profes- 
sionellen Möglichkeiten dieses beliebten Com- 
puters. 

Osborne, Danahue. 544 Seiten. Softcover. 

DM 59.-- 


NEU! C-64 Akustik und Graphik 
Ein planvoller Lehrgang - keine Beispielsamm- 
lung - in anschaulichem Stil — daher für jedes 
Alter. Dieses Werk eröffnet dem C-64-Benutzer 
die Welt der Graphiken und Klangbilder. Es ent- 
hält Programmbibliotheken und wird abgerun- 
det durch zahlreiche Anhänge. 

John Anderson. ca. 200 Seiten. Softcover. 


DM 49.-—. 4. Qu. 84 


NEU! LOGO Computersprache für Kinder 

und Eltern 

Dieses Buch beweist: Jeder kann program- 

mieren. LOGO ist die Computersprache für 

Eltern und Kinder. Nicht umsonst wurde dieser 

Titel zum „Buch des Jahres 1983“ in den USA. 

LOGO ist das Ergebnis der Erforschung 

menschlicher Intelligenz: entwickelt von einem 

Pädagogen und Mathematikprofessor. LOGO 

ist die erste Computersprache. die bewußt Stra- 

tegien menschlichen Denkens dient. 

6502 - Programmieren in Assembler Daniel Watt, ca. 400 Seiten, Softcover, 

Dieses Buch behandelt ausführlich die Assem- DM 59.-—. 4. Qu. 84 

blersprachen-Programmierung für den weitver- 

breiteten Mikroprozessor 6502. Er steckt auch EEE EEE 

in Ihrem C-64. u 

an Leventhal. 704 Seiten, Softcover. Hiermit bestelle(n) ich (wir): 
M 59.—— 


| 
| 
| 
| 
Der Sensible C-64 4.Q.84, DM 29,80 | 
CP/M und WordStar DM 29,80 | 
C-64 Programmsammlung 4.Q.84, DM 29,80 se a a Zn 
VisiCalc (mit CBM Diskette) DM79,-- | Datum Unterschrift 
„ 177 BASIC Programme DM 39,-- | 
S Mikrocomputer-Grundwissen DM 36,-- IN Fi 
:  C-64 Computer für Kinder 4.Q.84, DM 29,80 | MNBETENER 
VC20 Computer für Kinder 4.Q.84, DM 29,80 
| Straße/Postfach 
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kann aber nach links und rechts “ge- 
scrollt” werden. Die einfachste, aber 
auch teuerste Methode ist eine 80- 
Zeichen-Karte, ein Hardwarezusatz 
(auch als Software erhältlich), mit dem 
auf einem Monitor 80 Zeichen/Zeile dar- 
gestellt werden. 

Für kommerzielle Textverarbeitung 
dürfte dies wohl die einzige Alternative 
sein. Wer will schon in jeder Zeile aus- 
rechnen oder nachschauen, wo das ge- 
schriebene Wort schließlich auf dem 
Drucker erscheint. Voraussetzung für die 
80-Zeichen-Darstellung ist allerdings 
ein guter Monitor, da meistens Unschär- 
fen auftreten. 

Die Textverarbeitung mit dem C-64 
bietet die verschiedensten Möglich- 
keiten. 

Nachfolgend stellen wir Ihnen einige Pro- 
gramme vor. 


Heswriter 64 


Heswriter 64 ist ein englischsprachiges 
Textverarbeitungsprogramm das als Mo- 
dul geliefert wird. Die maximale Länge 
des einzugebenden Textes beträgt 727 
Zeilen a 36 Zeichen wobei der jeweilige 
Zeilenstand angezeigt wird. Eventuelle 
Korrekturen bei der Texteingabe können 
nur auf der bearbeitenden Zeile vorge- 
nommen werden. So wird jeweils das 
Zeichen links vom Cursor mit DEL ge- 
löscht, Einfügungen können mit INST 
vorgenommen werden. Mit den Befehlen 
HOME + CLR kann der rechte bzw. linke 
Rand angefahren werden. Es ist etwas 
umständlich, da Text- und Arbeitsmodus 
voneinander getrennt sind. Der jeweilige 
Modus ist an der Bildschirmumrandung 
festzustellen, der je nach Modus die 
Farbe wechselt. So ist z.B. beim Lö- 
schen der Bildschirmrand violett, beim 
Überarbeiten schwarz. 

Mit dem Befehl ”e” kann eine bestimmte 
Zeile auf den Schirm gebracht und über- 
arbeitet werden. Jetzt kann der Cursor in 
alle Richtungen gefahren werden, wobei 
der Text um die jeweilige Bewegung ver- 
schoben wird. Zur besseren Übersicht 
wird die aktuelle Zeilennummer ange- 
zeigt. Die Funktionstaste Fi bringt den 
Cursor zur obersten, F7 zur untersten 
Zeile. 

Umständlich ist das Einfügen von 
Zeichen, da die Zeile zum Einfügen genü- 
gend Freistellen aufweisen muß. Ist eine 
Zeile mit 36 Zeichen gefüllt, kann nichts 
mehr eingefügt werden. Am Anfang eines 
Absatzes können mit Shift und Space 
Leerräume geschaffen werden. Daten 
können mit ”w” (für write) auf Band oder 
Diskette abgespeichert werden. Die Ver- 
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knüpfung von Texten ist möglich, die Da- 
teien werden mit "r”(für read) in den Ar- 
beitsspeicher geladen. Sinnvoll auch die 
Durchnumerierung der Zeilen, die mit 
“n” (number) vorgenommen wird. So wird 
beim Löschen (”d”) einfach nur die Zei- 
lennummer angegeben und anschließend 
gelöscht. Zum Sichtbarmachen des gan- 
zen Textes auf dem Bildschirm gibt es 
mehrere Möglichkeiten, die Befehle Edit, 
List sowie das Festhalten der Shift- 
Taste. Shift bringt den gesamten Text 
mit, List ohne Zeilennummer. Der Edit- 
Befehl arbeitet langsamer, es wird mit 
dem Cursor gearbeitet. “f” ist eine Such- 
funktion, bei der die entsprechenden Zei- 
lenzahlen und Zeichenketten anzugeben 
sind. 

Copy (”c”) führt zur Verschiebung bzw. 
Kopie von Textbereichen, wobei Zei- 
lenzahl- und Bereich angegeben werden. 
Daten können mit "p” (PRINT) zum 
Drucker gegeben werden, es besteht 
auch die Möglichkeit mit dem Befehl ”P” 
(Preview) den formatierten Text zu- 
nächst auf den Bildschirm zu bringen. 
Weitere Funktionen zur Ansteuerung der 
Seitennumerierung, Randeinstellung 
links und rechts, Kopfzeile, Zeilenab- 
stand und Druckeranpassung erweitern 
den Anwendungsbereich. Schrift- und 
Hintergrunddarstellung kann farblich ge- 
ändert werden, die weiße Schriftfarbe 
bietet aber den besten Kontrast. 
Heswriter 64 kann auch 80 Zeichen/ 
Zeile verarbeiten, dazu wird jedoch eine 
80-Zeichen-Karte benötigt. Die Lesbar- 


keit der Schrift ist allerdings bei 40 N 


Zeichen/Zeile wesentlich besser. 
Abschließendes Urteil: 

Heswriter ist zwar kein profihaftes Text- 
verarbeitungssystem, bietet aber alle 
Standardfunktionen. 

Heswriter 64, Ariolasoft 


Textomat 

Textomat wird auf Diskette mit ausführ- 
licher deutscher Beschreibung geliefert. 
Nach dem Einladen kann der Benutzer 
zwischen 4 verschiedenen Zeichensät- 
zen auswählen, zwei amerikanische und 
zwei deutsche Zeichensätze stehen zur 
Verfügung. Textomat ist voll menuege- 
steuert und erlaubt die Fließtexteingabe. 
Das bedeutet, Texte können ohne Beach- 
tung der Zeilenlänge eingegeben werden, 
der Text wird bei der Druckerausgabe 
formatiert. 

Durch horizontales Verschieben lassen 
sich bis 80 Zeichen/Zeile darstellen. Pro 
Text können bis zu 24000 Zeichen erfaßt 
werden, die wahlweise mit ein oder zwei 
Floppy's verarbeitet werden können. Die 
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Übersicht, der jeweilige Arbeitsmodus ist 
problemlos abzulesen. Der Cursor kann 
im ganzen Text umherfahren, Zeichen 
können einfach überschrieben werden. 
Durch Drücken der Shift + Return Taste 
fängt ein neuer Absatz an, ein Pfeil hinter 
der letzten Zeile macht dies deutlich. Mit 
"INST” wird der Text um ein Zeichen ver- 
schoben, wichtig für eventue’ie Einfü- 
gungen. Zeichen werden mit ”DEL” ge- 
löscht, der Befehl "CRL” läßt den Cursor 
an den Textanfang springen. Textomat 
arbeitet in verschiedenen Modi, dem 
Schreib-, Kommando- und Textmodus. 
Die "CTRL"-Taste schaltet den Komman- 
domodus ein, 13 Befehle stehen zur Ver- 
fügung. Die vier Cursortasten bewirken 
den jeweiligen Sprung an das Ende bzw. 
den Anfang des Textes. Mit ”s” werden 
die Steuerbefehle aufgerufen, mit ”d” 
wird z.B. das Datum an die im Text 
markierte Stelle geschrieben. Eine Be- 
sonderheit ist der eingebaute Ta- 
schenrechner, der mit ”C” aufgerufen 
wird. 

Die vier Grundrechenarten können un- 
abhängig vom Text benutzt werden. Die 
Fi-Taste schaltet den Menuemodus ein, 
der Cursor fährt den Befehl an und wird 
mit "Return” ausgeführt. Der Menuemo- 
dus wird mit F2 wieder ausgeschaltet. 
Beim Abspeichern von Texten auf 
Diskette wird zunächst der Punkt ”Aus- 
gabe” anschließend ”Speichern” ge- 
wählt. Nun kann der Text eingegeben 
werden, mit F1 läuft die Floppy an. 
Fast jeder Drucker kann angepaßt wer- 
den, Kompatibilität wird großgeschrie- 
ben. Eine weitere Funktion von Textomat 
sind die Blockoperationen, Textblöcke 
können gelöscht, eingelesen oder kopiert 
werden. Anwahl des Punktes "Kopier” 
veranlaßt den Benutzer zum Markieren 
der Textstelle, an den der Block kopiert 
werden soll. Ebenso die Funktion 
”Lösch” zum Löschen eines Blocks. Das 
Suchen und Ersetzen von Wörtern ist in- 
zwischen Standard eines guten Textver- 
arbeitungsprogrammes. Mit Fi wird der 
Menuemodus eingeschaltet, "Edit" und 
anschließend ”Suchen” rufen die Einga- 
bemaske auf. Jetzt können die Suchkri- 
terien bestimmt werden,  Bild- 
schirmkontrolle über die Funktionen ist 
jederzeit möglich. In Verbindung mit Da- 
teiprogrammen können Rundschreiben 
erstellt werden, eine Besonderheit ist das 
Erstellen von Formularen. So werden vor 
Texteingabe bestimmte Formate festge- 
legt und Briefe, Angebote und Rund- 
schreiben erhalten spezifische Formu- 
lare. 

Abschließendes Urteil: 

Textomat ist ein enorm leıstungsfähiges 


Textverarbeitungsprogramm, mit dem es 
Spaß macht zu arbeiten. Auch für kom- 
merzielle Textverarbeitung ein an- 
sprechendes Programm. 

Data Becker 


Word-Proc 


Das Textverarbeitungsprogramm Word- 
Proc ist auf Kassette erhältlich, kann 
aber problemlos auf Diskette übernom- 
men werden. Die Floppy-Steuerbefehle 
sind Bestandteil von Word-Proc. Nach 
dem Laden erscheint zunächst die 
Statuszeile, aus der folgende Informatio- 
nen entnommen werden: 

1. Zeigerposition im Text 

2. freier Speicherplatz 

3. freier Speicherplatz im Hilfsspeicher 
4. Statusmeldung 

Unterhalb des Textfensters befindet sich 
die Befehlszeile. Hier wird der jeweils 
vom Benutzer angewählte Befehl ange- 
zeigt. Ein Eintrag in diese Zeile wird mit 
der "C”-Taste vorgenommen, sie öffnet 
und schließt die Befehlszeile. Es ist mög- 
lich, mehrere Befehle einzutragen, sie 
werden automatisch hintereinander ab- 
gearbeitet. So kann z.B. das Suchen und 
Ersetzen von Textstellen in eine Befehls- 
zeile zusammengefaßt werden. In 
Schreib- bzw. Textmodus stehen dem 
Anwender viele Befehle zur Verfügung, 
durch Belegung von Sondertasten ist der 
Cursor an beliebige Textstellen zu 
bringen. 

Belegung von Sondertasten: 

Cursor hoch/runter - Anfang nächste/ 
letzte Zeile 

Cursor rechts/links - ein Zeichen vor/ 
zurück 

FI - ein Wort zurück 

F3 - ein Wort vor 

F5 - ein Absatz vor 

F7 - ein Absatz zurück 

CTRLE - 20 Zeichen vor 

ETRLW - 20 Zeichen zurück 

SHIFT F6 - Anfang des Textes 

SHIFT F8 - Ende des Textes 

Durch Drücken von SHIFT/RUN ver- 
bleibt der Cursor in der Zeile und der Text 
kann bewegt werden. Korrekturen wer- 
den im Überschreib- oder Einfügemodus 
vorgenommen, der Modus wird mit 
SHIFT/HOME geschaltet. Hier ist die Be- 
legung von Sondertasten ebenfalls sehr 
hilfreich, folgende Funktionen stehen 
zur Verfügung: 

HOME - ein Zeichen vorwärts löschen 
DEL - ein Zeichen rückwärts löschen 
CTRL Z - zeilenweise vorwärts löschen 
CTRL X - zeilenweise rückwärts 
löschen 

CTRL 8 - absatzweise rückwärts 


löschen 

Eine Besonderheit ist das Ablegen von 
Texten in Hilfsspeicher. Er wird mit CTRL 
0 eröffnet und mit CTRL N wieder ge- 
schlossen. Der Inhalt des Hilfsspeichers 
läßt sich an jeder beliebigen Cursor- 
position wieder ausgeben. Word Proc ar- 
beitet mit 40 Zeichen/Zeile, wobei das 
Programm einen automatischen Zeilen- 
umbruch vornimmt. Gleichzeitig wird die 


Zeile formatiert, Fließtexteingabe ohne 
Beachtung der Zeilenlänge ist möglich. 


FAZIT: 

Ein starkes Textverarbeitungspro- 
gramm, leicht zu bedienen und übersicht- 
lich aufgebaut. Schade, daß keine 80 
Zeichen/Zeile dargestellt werden. 
Dynamics 


für den Commodore 64 


Ein vulkanischer Ausbruch hat Bergar- 
beiter in einem Minenschacht im Berg 
Leone eingeschlossen. Roderrick Hero 
benötigt Ihre Hilfe und seine Spezial- 
ausrüstung, um die Bergarbeiter zu 
retten. 

Dies ist der Einführungstext zum neue- 
sten Programm der Firma ACTIVISION. 
Nachdem die bisher im Telespielge- 
schäft tätige Firma verlauten ließ, keine 
Homecomputerprogramme auf den 
Markt zu bringen, schlagen sie jetzt 
plötzlich mit drei Spielen auf einmal zu. 
Der Marktrenner “DECATHLON”, über 
den wir schon berichteten, das Pro- 
gramm “HERO” und das Arcadespiel 


"BEAMRIDER”. In Vorbereitung ist der 


Superstar der Telespiele “PITFALL”. 

Aus der Eingangserklärung könnte man 
schließen, “HERO” wäre eines der un- 
zähligen Miner-Spiele, die in diesem Jahr 


große Mode waren. Eine gewisse Ähn- 
lichkeit ist auch nicht abzuleugnen. Der 
Spielablauf übertrifft alles bisher dage- 
wesene bei weitem. 

Roderick Hero ist ausgerüstet mit einem 
Tornisterhubschrauber und ein Paar 
Stangen Dynamit. Damit fliegt er nun in 
ein Höhlensystem, um immer einen Berg- 
arbeiter zu retten. Spinnen, Ratten und 


. Fledermäuse wollen ihm das Leben 
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schwer machen. Aber Gott sei Dank ister 
mit einer Kombihelmlampe bestückt, in 
der sich ein Laser befindet. Kommt er an 
eine Mauer, so muß man diese mit den 
Dynamitstangen sprengen. Hierbei ist al- 
lerdings größte Vorsicht angeraten. 
Nachdem die Lunte brennt, muß schnell- 
stens weggeflogen werden, da man sich 
sonst selbst in die Luft sprengt. Die 
Schwierigkeiten sind hiermit noch lange 
nicht zu Ende, der Energievorrat des He- 
likopters muß ständig überprüft werden. 
Geht einem das Dynamit aus, muß man 
sich mit dem Helmlaser durch Wände 
brennen, was sehr viel Energie frißt. 
Kommt man mit dem Rotor an eine der 
Lampen, die das Bergwerk erhellen, so 
geht diese aus und Roderick muß einen 
Blindflug starten. Kommt man im 10. Le- 
vel an die Lavaseen, gibt es keinen Platz 
mehr zum fliegen, und man muß in alter 


ner 


Donkey Kong Manier von einem treiben- 
den Felsstück auf ein anderes springen. 
Sie sehen, daß dieses Programm recht 
umfangreich ist. Die Grafik ist ausge- 
zeichnet gelungen und auch am Sound 
gibt es nichts auszusetzen. Das Pro- 
gramm ist von der Firma Activision und 
ist bei Ariolasoft für ca. 50,- DM auf 
dem deutschen Markt erhältlich. 

(tm) 


25 


Liebe Gompute mit Leser, 


in unserem heutigen Suchrätsel, das Ih- 
nen sicher ebenso viel Spaß machen wird 


; wie in der letzten Woche, suchen wir ei- 
: nen Begriff, den jeder Programmierer, 


gleich welches System er benutzen mag, 


; kennt. 

; Unser Suchwort bezeichnet eine Anwei- 
: sung, die in einer festgelegten Sprache 
; abgefaßt ist und aus einer endlichen Fol- 
; ge elementarer Verarheitungsschritte be- 
; steht. 

; Das aus elf Buchstaben bestehende Wort 
; setzt sich aus den Anfangsbuchstaben 
; derfolgenden Begriffe zusammen, die Sie 
: in unserem quadratischen Buchstaben- 
: Wirrwarr ausfindig machen sollen. 


ZODSLMPU-HNDOTZZ-A<nounrruDp 
HUATHAHUTIENDZ<CH N I Ppz-mo 
O-rHN-r- rc Ten pnmTım 
N<NIHNCEPPDEnNnD-ATmMmrz-on 
TANHUHRTZRNODOHNDZE<SHOO<D,uN 
DTITED-HNEHMM-H-HUPUDTrOnN<zZx 
UNDPPUTMTVTNDNODO-HDE<Tr-DDE 
AINATITrTArO II nNDmMru<euncz 
TC-JErDBzZzumzpczcomndör«“z 
zuwu-cuoumo-m-nurmsHnorHe 


1. 


Programmiersprache für Aigahen aus dem 
techn.-wiss. Bereich. 


. Programmiersprache für Kinsiehber und vor- 


zugsweise schulische Anwendung. 


.neue sehr komfortable Basic-Erweiterung für 


den Commodore 64 


. kalifornisches Betriebssystem für 8/16 Bit-Pro- ' 


zessoren 


. Generator-Sprache für vornehmlich kommer- 


zielle Aufgabenbereiche 


. Programm im Autostart-ROM 
« Pascal-Version, die auf dem CP/M-Betriebs- 


system läuft 


. Neuartige Funktionstaste des CBM-Rechners 264 
. Master-Control-Programm des Filmes ”"TRON” 
. Benutzerorientiertes Mehrplatz-Betriebssystem, 


für das die Programmiersprache ”C” geschrie- 
ben wurde 


11. Erweitertes Basic für den Commodore 64 


“WO TNZEZOTNNDorınrD-4o<zın 
Dorpwvw-TnınCn7tm"poppy<rVü-—- 
SS DEE OD TI Dr DE UTDM 
WVWOINZH ZI rr<nWmz-Änunzm-c 
ODn-rano"r-oDpz<unzm-“xXx<0O< 
IOoZprZı << o-. NT ccpoprw- wo” 
zonnmmcz—-zz Zw-7rnrzıarım<on 
PpPmmo cr CcnH zH4zz-0-4Ir0T0D 
ODxPprun anuouZ-rc<cmc<py,"-orDru 
A TPODJMENDIIDOUTO<O<<rORSo 
ycuurnzzonXır “mn „zoom.“ 


Wieder gibt es Gutscheine für viele interessante Spielprogramme zu gewinnen, die Sie 


selbstverständlich für Ihren Rechner erhalten. 


1. Preis: 
2. Preis: 
3. Preis: 
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5 Gutscheine 
3 Gutscheine 
2 Gutscheine 
4.-25. Preis: I Gutschein 
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Als Ausgabegerät für infor- 
mationsarbeitende Systeme 
aller Art ersetzt er mal Schreib- 
maschine oder Telex mal 
Kopierer oder Vervielfältiger: 
Der EDV-Drucker. Doch so 
schnell, zuverlässig und selb- 
ständig er auch arbeiten mag, 
ein Makel haftet ihm zumeist 
an- der Lärm, den er erzeugt. 
Und das ist dann besonders 
schlimm, wenn er sich in der 
Nähe eines menschlichen Ar- 
beitsplatzes befindet. Was 
sich dabei gegen den Men- 
schen richtet, ist alles andere 
als ergonomisch. Den Hoff- 
nungsschimmer am Horizont 
bildet hier die Ink-Jet-Tech- 
nologie. Auf deutsch: der 
Tinten(strahl)-Drucker. 

Noch steht es in vielen Nach- 
schlagewerken nicht einmal 
drin, jenes in letzter Zeit mehr 
und mehr bemühte Wort ‘Er- 
gonomie’. Darunter zu ver- 
stehen ist eine Kombination 
aus Forschungsaufgaben und 
der Umsetzung daraus 
resultierender Erkenntnis zur 
Entwicklung menschen- 
gerechter Arbeitsplätze und 
Gestaltung humaner Arbeits- 
abläufe. 

Im Mittelpunkt steht also der 
Mensch: Genug Licht am Ar- 
beitsplatz, die geeignete Sitz- 
gelegenheit, handgerechte 
Werkzeuge, sicht-optimierte 
Lage von Beobachtungs- 
fronten oder körperfreund- 
liches Klima: all das ist Ergo- 
nomie. Auch der auf den arbei- 
tenden Menschen einwir- 
kende Lärmpegel ist eine 
wesentliche 'Ergonomie-Kom- 
ponente. 

Genau hier aber wird’s 
kritisch. Denn bisherige Tech- 
niken für Arbeitsplatzdrucker 
erlaubten, gelinde gesagt, nur 
unzumutbare Lärmbelästi- 
gung für den Menschen. 
Nicht, weil es keine leiseren 
Techniken gab, sondern weil 
die aus organisatorischen 


Gründen bevorzugten Tech- 
niken ‘impact’, also an- 
schlags-orientiert waren. 
Dazu zählen Nadel-, Band-, 
Ketten- und Typenraddruk- 
ker. 

Natürlich gibt's auch schon 
länger ‘leise’ Techniken wie 
Thermo- Ink-Jet-, elektro- 
statische und Laserdrucker. 
Doch entweder das Aus- 
sehen des Ausdrucks (wer 
verschickt schon gern einen 
Geschäftsbrief auf Thermo- 
papier) oder der zu hohe Preis 
der Geräte verhinderte den 
Einzug menschenfreund- 
licher Technologien an den 
Arbeitsplatz. 

Erst die explosionsartige Ver- 
breitung des Mikrocomputers 
hat bei einigen Herstellern 
Überlegungen ausgelöst, 
höherwertige Techniken in 
preiswerte Arbeitsplatz- 
drucker zu integrieren. Als ei- 
ner der Pioniere kann hier die 
Firma TANDBERG DATA gel- 
ten, die nach ihrem Erfolg mit 
ergonomischen Bildschirm- 
terminals mit preiswerten 
Tintendruckermodellen (Preis 
noch unter 2000 Mark) zur 
Zeit in die Massenmärkte 
vorstößt. 

Was ist so besonders an je- 
nen Tintendruckern (den 
‘strahl’) kann man wohl ohne 
Informationsverlust einfach 
weglassen). Sie sind klein, 
leicht und handlich! Sie haben 
eine gute Schriftqualität und 
sind grafikfähig, Schrift und 
Grafik sind mischbar. Sie sind 
verdammt leise, nämlich un- 
ter 50 dBA. 

Nun sind Begriffe wie ‘Lärm’ 
und ‘leise’ relativ, vor allem, 
wenn man die Werbeaussa- 
gen mancher Druckerherstel- 
ler mit der geräuschreichen 
Arbeitsweise ihrer Produkte 
am Arbeitsplatz vergleicht. 
Um es klar zu sagen: Mit 
Anschlagstechnik (impact) 
arbeitende Drucker sind am 


Der Ink-Jet-Drucker: 


Sinnloser Luxus oder praxisgerechter Komfort? — 


Arbeitsplatz wegen ihres 
Lärmpegels unausstehlich! 
Ein _Schallschutzgehäuse 
drüber? Sicher eine lärmmin- 
dernde Lösung. Aber oft teu- 
rer als ein Tintendrucker, um- 
ständlich bei der Bedienung 
und sperrig. 

Die Aussagen von Menschen 
über Begriffe wie ‘Geräusch’ 
und ‘Lärm’ sind, wie bereits 
festgestellt, relativ. Einigen 
wir uns darauf: Es fällt alles 
darunter, was das mensch- 
liche Ohr wahrnehmen kann. 
Normalerweise willman beim 
Arbeiten aber seine Ruhe ha- 
ben. ‘Sei doch still’, sagt die 
Mutter zum Kind ‘Papa muß 
noch was arbeiten!’ Und der 


Schalldruck 
in Dezibel 
140 

120 

100 


80 Staubsauger 
60 Unterhaltung 
40 ruhiges Büro 
20 Flüstern 

0 Hörschwelle 


Geräuschpegel unserer Um- 
welt ist sowieso ganz schön 
üppig. Warum also leugnen, 
daß einem das Arbeits- 
geräusch eines Nadel- oder 
Typenraddruckers auf den 
Wecker geht! 

Sicher, mit mechanischer An- 
schlagstechnik arbeitende 
Drucker haben einen un- 
übersehbaren Vorteil: Sie kön- 
nen in einem Arbeitsgang 
gleich mehrere Durchschläge 
erzeugen. Das bleibt anschlag- 
losen Drucktechniken (non 
impact), wie dem Tinten- 
drucker, verwehrt. Dafür isteer 
schneller. Und, wie bereits 
ausgeführt, unvergleichlich 
leiser. Wobei die mechani- 
schen Erschütterungen, die 
Impact-Drucker erzeugen, 
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Schallerzeuger 
Düsenflugzeug beim Start 


Donner 
U-Bahn 


‘ Graham Bell definiert), ein lo- 


auch nicht vergessen werden 
dürfen. Der rücksausende 
Druckknopf dieser Geräte hat 
schon manchen Gegenstand 
zerlegt, der sich in Reichweite 
der Erschütterungsenergie 
befand. Computer und Termi- 
nals eingeschlossen. 

Wie messen nun Arbeitsme- 
diziner Geräusche, wie be- 
werten sie ihren Einfluß auf 
den Menschen und was ist 
nach ihrem Ermessen am Ar- 
beitsplatz noch zumutbar? 
Messbasis ist der Schall- 
druckpegel, d.h. der Energie- 
gehalt eines Geräusches im 
Vergleich zum leisesten noch 
hörbaren Geräusch. Als 
physikalische Einheit für den 


Messwert dient die Bezeich- 
nung ‘Dezibel’ (übrigens von 


garithmisches Maß. Dies be- 
deutet, das beispielsweise + 
3dB die doppelte Energie, + 
6dB die vierfache und + 
30dB etwa die tausendfache 
Energie darstellt! 

Um die Empfindlichkeit des 
Ohres mit ins Spiel zu brin- 
gen, gab es früher die Be- 
zeichnung ‘Phon’, was inzwi- 
schen der Angabe 'dB(A)' 
weichen mußte. Dabei stellen 
+ 10dBA die doppelte, + 
20dBA die vierfache, + 
30dBA die achtfache und + 
40dBA die sechzehnfache 
Lautstärke als Maß für die 
Empfindlichkeit des Ohres 
gemessenen Schalldruckpe- 
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gel dar. Zum Vergleich 
einige Alltagswerte: 


In40 cm Entfernung von einer 
Kugelkopfschreibmaschine 

ergibt sich der Lärmpegel von 
immerhin 76 dBA, ein Schall- 
Schluckgehäuse mindert die- 
sen Wert auf 62 dßBA. 
Wesentlich leiser, wenn man 
die logarithmische Kurve be- 
denkt, jedoch immer noch zu 
laut. Ein ° Tintendrucker 
bringt's immerhin auf Werte 


von 44 bis 49 dBA (wobei das 
lauteste die mechanisch be- 
wegten Teile für Druckkopf 
und Papiertransport sind!). Er 
bewegt sich damit im Bereich 
der sogenannten normalen 
Sprachverständigung. 

Ergänzungstechnik für den 
Tintendrucker könnte, was 
die ‘Durchschläge’ angeht, 
der moderne Bürokopierer 
sein. So ist auch der viel- 
zitierte ‘6. Durchschlag’ ge- 
nau so gut lesbar, wie das Ori- 


ginal. Und entspricht diesem 
aufs ‘'-Tüpfelchen. Zudem 
können vorhandenes Ge- 
schäftspapier oder Vordrucke 
benutzt werden, es ist nicht 
für alles Endlospapier erfor- 
derlich. 

Eines ist klar: Der Tin- 
tendrucker kann nicht alle 
Druckanforderungen der In- 
formationstechnik abdecken. 
Aber er ist das derzeit ergono- 
mischste Drucksystem am 
Arbeitsplatz. Und, wie Bei- 


spiele zeigen, für jeden er- 
schwinglich. Mit dieser Technik 
ist auch ein Relikt aus alten 
Zeiten an den Arbeitsplatz zu- 
rückgekehrt: die Tinte. Nur in 
etwas veränderter Form. Aber 
schließlich tragen wir ja auch 
keine Armelschoner mehr 
Und wenn doch, dann höch- 
stens, weil's ergonomischer 
ist. 


Kur 


VERTEILTE RETTEN 
WERSIBOARD MUSIC 64 


TEST TEST 


TEST TEST 


Wersi, seit Jahren international bekannt für elektronische Musikinstrumente stellt 
jetzt für Commodore Computer Freunde das WERSIBOARD MUSIC 64 vor. 


Für jeden an Musik in- 
teressierten die Ergänzung 
seines Computersystems: 
Ein Keyboard im Profidesign 
mit Interface und exklusiver 
Software. Sie spielen nicht 
mehr auf der Software wie bei 
bisherigen Synthesizer Pro- 
grammen, sondern auf einem 
richtigen Orgel Manual. Fast 
alle Instrumente eines Orche- 
sters und können über die 
zahlreichen Gestaltungsmög- 
lichkeiten beliebig viele 
Klangfarben erzeugen — bis 
hin zu den eindrucksvollsten 
Synthesizer Stimmen. Die 
Hardware des Systems be- 
steht aus Bildschirm, Floppy, 
Computer sowie dem mit 49 
Tasten und 4 Oktaven be- 
legten Keyboard mit Inter- 
face. Das Manual ist sehr sta- 
bil und paßt optisch sehr gut 
zum C-64. Einen eigentlich un- 
beabsichtigten Sturz “Test” 
vom Tisch überstand es ohne 
weiteren Schaden. 

Die Installation auf den Com- 
puter geschieht auf unproble- 
matischste Weise, in dem 
man das Interface in den Mo- 
dulschacht steckt. Somit ist 
das System auch kompatibel 
zum SX 64. Die Software wird 
auf Diskette geliefert und bein- 
haltet drei Programme: 

1.: MONO 64, ein monopho- 
ner Synthesizer mit 13 fest 
programmierten Klangfarben 
2.: POLY 64, ein polyphoner 
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Synthesizer mit 5 fest pro- 
grammierten Klangfarben 

3.: GESTIONE, ein Maschi- 
nencode Treiberprogramm 
zur Keyboardabfrage und 
Interuptsteuerung. 

Mono 64 ist das Programm 
für einen monophon spielba- 
ren Synthesizer. Monophon 
bedeutet einstimmig, also nur 
eine Taste des Manuals wird 
zur Klangerzeugung herange- 
zogen. Nach dem Einladen 
des Programms bietet der 
Rechner 13 “PRESENTS” an. 
13 vorbereitete Instru- 
mentenklänge, die nun weiter 
verändert werden können: 
TRUMPET, BRASS, CLARI- 
NET, BELLS FLUTE, GUITAR, 
WHA-BRASS, STRINGS, 
PIANO, ELECTRIC ORGAN 
ACORDEON, RANDOM. 


Nach der Auswahl wird mit 
der Rechnertaste “Pfeil nach 
oben” das Instrument zum 
Spiel freigegeben. Der Bild- 
schirm zeigt alle Parameter, 
die nun Zug um Zug verändert 
werden können: ENVELOPE: 
ATTACK, DELAY, SUSTAIN, 
RELEASE FILTER: MODE, 
CUT OFF, ADSR, RESO- 
NANCE, LFO, RATE, VCF, 
0SG, 0SG 1, 0SG 2, DUTY 
CYCLE, TRANSPOSE, DE- 
TUNE, MAIN VOLUME. 


Über die Funktionstasten des 
Rechners können die einzel- 


nen Parameter angesprochen 
und verändert werden. Wie 
bei einem großen Studio- 
Synthesizer können völlig 
neue Klangfarben erarbeitet 
oder beliebige Naturinstru- 
mente nachgebildet werden. 
Die faszinierenden Welten der 
Musik und der Technik ver- 
schmelzen miteinander und 
man vergißt beim Experi- 
mentieren mit den neuen 
Klangfarben völlig Zeit und 
Raum. 


Poly 64 ist das Programm für 
einen polyphon spielbaren 
Systhesizer. Polyphon heißt 
mehrstimmig, bis zu drei Ma- 
nualtastten können nun 
gleichzeitig für die Klanger- 
zeugung ausgewertet wer- 
den. Nach dem Einladen des 
Programmes bietet uns der 
Rechner menuegesteuert 5 
weitere Klangfarben an: 
SPINETT, ACORDEON, TU- 
BULAR BELL, FLUTE und 
BANJO. 


Die Bedienung ist bei beiden 
Programmen annähernd die 
gleiche. Mit Poly 64 läßt sich 
schoneine recht schöne Orgel 
realisieren. Kaum eine Heim- 
orgel bietet die Möglichkeit, 
eine solche Fülle von Para- 
metern zu verändern. Aber 
auch derjenige, der gar nicht 
so tief in das Musizieren ein- 
steigen möchte, findet beim 
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Spielen von neuen Klängen 
und beim Experimentieren 
mit neuen Klangfarben soviel 
Spaß und Freude, daß das 
WERSIBOARD 64 eigentlich 
zur Grundausstattung eines 
jeden Commodore 64 gehören 
sollte. Das System ist damit 
jedoch noch nicht abgeschlos- 
sen, : Wersi bietet auch 
noch eine Schnittstelle an, 
mit der man den Commodore 
über RS 232 direkt an die 
großen Wersi Profi Orgeln an- 
schließen kann. 

Weiterhin ist in Vorbereitung: 
ein Keyboarder mit noch 
größeren Klangspeichermög- 
lichkeiten; Software für den 
pädagogischen Bereich (Schu- 
le, Universität usw.). Bei 
dieser Menge Möglichkeiten 
ist der Preis von 495,- DM 
noch erstaunlich niedrig, da 
eine vergleichbare Profiorgel 
das Mehrfache kostet. Einzi- 
ger Schwachpunkt des Sy- 
stems ist das kurze Hand- 
buch was zum Einspielen 
zwar vollkommen ausreicht, 
für fortgeschrittene Zwecke 
die Anschaffung eines Buches 
über Synthesizersysteme je- 
doch vonnöten macht. 

Wir werden unsere Leser 
weiterhin über die Zusatzpro- 
gramme des WERSIBOARD 
64 auf dem laufenden 
halten. 


HR 


krE 
für den \C-2 


hiuß mit dem yorsintflutlichen Ausrechnen von Sonderzeichen mit ange- 


Ab heute ist SC | \ 
knabbertem Bleistift auf einem zerknitterten Stück Papier. 


Nachdem das Programm gestartet wurde, Wollen Sie das Zeichen in REVERS- sten, Cursorsteuertasten und Return. 
erscheint auf dem Bildschirm ein 8*8 Ra- Darstellung haben, dann betätigen Sie 13-16: Bewegung des CursorS 
ster, auf dem jetzt ein beliebige$ grafi- jetzt’g'. Nach kurzer Zeit wird nun das grä“ 100-122: Berechnung und Ausdruck der 


sches Zeichen erstellt werden kann. Die fische Zeichen im Raster aufgemalt. dezimalen Zahlen des auf dem Bildschirm 

Steuerung des Cursors geschieht mit den 'DRAW' ist also die Umkehrfunktion ZU in 8*8 Raster enthaltenen Zeichens. 

beiden Cursorsteuertasten. Wenn ein gra- 'CcOMP'. 150-175: Umwandlung der eingegebenen 

fischer Punkt gesetzt werden soll, dann dezimalen Zahlen in binäre Zahlen und 

drückt man die RETURN-Taste. c) Vielleicht kennen Programmierer von  Poken des daraus entstehenden Zeichens 
Personalcomputer diesen 'pPSET'-Befehl auf den Bildschirm in den 8*8 Raster. 

Jetzt zu den Funktionen: schon. Hier wird er ein wenig abgewan- 300-305: Abfrage für 'PSET und setzen 

Fi = COMP delt. des Cursors an die angegebene Stelle. 

F2 = ENDE Mit der F5-Taste kann der Cursor in die ge 

F3 = DRAW wünschte Reihe und Spalte versetzt wer“ Varlablenliste: 

F4 = FREE den. Man braucht bloß auf die Frage, die yy$ = Enthält entweder’t’ oder ’0’ für nof- 

F5 = PSET Reihe und Spalte einzugeben. male oder reverse Darstellung. 

F6 = FREE AV$ = Variable für GET-Abfrage, be- 

F7=C15 d) Nach Druck auf die Taste F7, wird das stimmt XYS, wenn RVg='y' dann 

Fg = RUN grafische Zeichen, das sich zur Zeit im Ra- yy$='1', wenn RV$='N’ dann yys=V. 
ster befindet, gelöscht. Die Zahlen bleiben BNSLI)-BNSLE) — Enthalten die 'Zahlen‘ 

a) Wenn ein grafische$ Zeichen in den Ra- allerdingS erhalten. für die jeweiligen Zeichen. 

ster gemalt worden ist und man die Zahlen L> Basiswert für Tongeneratoren und 

ausgedruckt haben möchte, dann drückt e) Mit der F2-Taste, also SHIFT+F1, wird Lautstärke. 

man die Fi1-Taste. as Programm beendet. D = Wert der addiert wird für Position 

Die Zahlen werden in der jeweiligen Reihe im Farbram. 

rechts in den Bildschirm eingeblendet. Da- 9Die Tasten FA und F6 können vom An- A = X-Wert des CursorS. 

nach brauchen Sie nur noch die Zahlen in wender selbst programmiert werden. B = Y-Wert des Cursors. 

DATA-Anweisungen zu schreiben und ent- UR/TFE = Schleifenvariablen 

sprechend zu definieren. Jetzt ist problem- g) Wenn die F8-Taste gedrückt wird, wird 0 = Position des CursorSs auf dem Bild- 

\os ein Sonderzeichen definiert worden, das Programm neu gestartet. schirm. Berechnet auS A+B*22 

das z.B. für Spiele eingesetzt werden Also werden die Variablen gelöscht. ı= Tastaturabfragevariable 

kann. X = Wert der zu A addiert wird. 
Vielleicht revolutioniert dieses Programm Y= Wert der zu B addiert wird. 

b) Will man es umgekehrt machen, das die umständliche Berechnung von Sonder- y = Entferung vom jeweiligen Ab- 

heißt, aus den Zahlen, die man bereits hat, zeichen und erleichtet eS den Anwendern, fragepunkt. 

ein grafischeS Zeichen auf den Bildschirm diese zu erstellen. pi-P8 = Enthalten Zahlen für ein einzel- 

bringen, dann ückt man die F3-Taste nes Bit. 

Danach erscheint unten, zwischen den Programmaufbau: gu)-gie) = Enthalten Zahl des definierten 


Funktionen, der Schriftzug 1, Spalte. 10-42: Definition einiger Variablen. LÖ- Bytes. Berechnet auS pi+P2+PS... 
Jetzt geben Sie die erste Zahl ein. Dies schen des Tastaturpuffers, Autorepeat p$ = Enthält Cursorsteuerzeichen für die 
geht bis zuf achten Spalte. Dann erscheint setzen und Bildschirmaufbau. jeweiligen Anweisungen auszudrucken. 
die Frage 'REVERSE (WIN). 50-712: Tastaturabfrage für Funktionsta- 


el L=36878:POKEL* 1,8: POKEL., 15 D=30728:PokE65® PR} 
28 

22 a ee SPRINT" 263 1":PRINT" ga2s6s sae 1 ’CHRS 
23 PRINT" BEE enge 


i T08 
25 PRINT"ERN"T" RN “un ıı (rs IFT=BTHEN2? 
26 PRINT" en 


” “ 
48 PRINT" ao zınee zprAWM FREE" 
al PRINT"WEFSETE s3FREE® zıs @ zRUuN 3" 
B:POKEO+D „@:POKEO, 168 


so ECKEL-4 ‚012 «PEEK 197? 
51 IFPEEK (653) «OTHENSS 
s2 IF2=39THENSYS65234 
53 1F2 47 THENREM .... 
54 1F2 =5STHENREM ur.” 
s5 IFZ =53THENRUN 

s5 a Banon>atnensts-21GOTeln 

57 ı1F2=31ANDE JSSTHENY=-44 601073 

s3 G0T0?71 

63 1F2=33THEN18® 

64 1F2=47THENISO® 

65 1rzZ=SSTHEN388 

65 1F2=E3THEN22 

63 ee ezannon« 1eTHEtte22C0TETE 

70 LS LASSTHENL RATEN 

ai 1F2 = 15ANDA: I8THEN?A 

2 60T058 

73 en nr 
0T05® 

74 N eanereassnoıpaken Bar ranEn. 1er Ira 

5 6371958 

76 BOTOSR neo.2en,2ıpoKEo+2,1uat«oTu“f 

108 nu.g41 FORH=1TOSE VeV+AN 

102 ak err7ası = tOETHENPIT ER 

133 ER 77 rarv >= 1ORTHENPETS 

194 eK ay 77a u >= OSTHENDITTE 

ı35 eek e7776 40) # 102 TMENAAT OS 

126 een ep 7&s v2 LORTHENPERT 

197 een. 7730 V) 182 THENPON 


11 ee na naıparo 7a rara ET 

112 ER INT ng" : FORH=1 TOD 

113 PR Nr zannaunBABURBEBRRRN| ":NERT 

115 PRINT" Sa" : FORH” ıT08 

116 a aununanannnnal STADT. 

129 ee a nel +2 r WERTE NET 

retro POKEL-2,8:50T050 

159 POKEL 2 BI EBTTER or» Toner ET ee 

ı51 INPUT” nat (Ta jracT> BaRacT" y255THENISE 
ıs2 NERT 

183 PRINTPS"REVERSE 3:19? ananıinanı" :FükE 198,0 

154 TE 

155 SoTc 154 

156 PRINTPF" „6079163 

155 PRINTPZFT"M. REIHE wususml" ; :ıG0T0151 

1€3 Te ee 


T 

1€e5 T era rosıallenlitaA1FoRI=1Tad FROKEh 4. 

169 TERVS="NTTHENKYS="I 

178 ERVS=" I THENMYS= NO" 

172 REITER meer EEE 

173 ia 
4,256 

175 nern Teenage ET 

2.088 PRINTPS"WELCHE RT 

301 Bay paRunn ehe IE 

s82 PRINTPE"WELCHE zEILE »:FOKE19S.9 

305 a ie) =ooR YA. (REITEN 

394 PRINTP#" DSTMENDE. anen>=1E@THENTONET ERBE öne 
3085 are 
so8 Rei ee 


soı REM» * 
so2 REM* H-SRAFIR-E * 
so3 REM+ * 
oa REM «c)193+ Ev * 
s95 REri# * 
se5 REM# AUERLEN * 
507 REM4+ ERINST * 
5353 REM* * 


5383 BERVERPLLLLELLIZZ 


Das Programm ist menuegesteuert und ( Pe ; BD] Bi 


klärt sich weitgehend selbst. 

Es wird vor allem die vielen Funker unter 
unseren Lesern interessieren, die mit Hilfe 
dieses Programmes die Code-Zahlen für 
verschiedene immer wiederkehrende 
Funksprüche erlernen können. 


Variablenliste: 

A$ = Zahlen Ten Code 

B$ = Zahlen abgekürzter Ten Code 

C$ = Text Ten Code 

D$ = Text abgekürzter Ten Code. 

E$ = Zahl 10 vor A$ und B$ bei Überprü- 
fung richtig/falsch 

Q u. M = Verzögerungsschleifen 

FI = Farbenwahl 

F2 = Farbenwahl 2 

$$ u. 0$ = Tastaturabfrage 

2$ = Eingabe Anzahl der Fragen 
2=7 

B = Verzögerungsschleife für Fragen- 
anzahl 

X = Zufalls-Auswahl 

B$ = Bewertung 

P = Richtige Eingaben 

F = Falsche Eingaben 


18 REM 
15 REM - 

£E8 REM - CB-TEN-CODE 
85 REM - & 

38 REM - 
35 REM - 
48 REM - 
45 REM - 
sa REM - 
55 REM - 
68 REM - 
65 REM - 
78 REM - 
75 REM - 
88 REM 
85 PRINTCHR$(S3> 

38 PRINT"LZI" :POKES32S81,8:POKE 
188 PRINT" u * 

118 PRINT" ” 

128 PRINT" 

158 FRINT" 
148 PRINT” 
158 PRINT" 
168 PRINT" 
178 PRINT" 
ia PRINT" 
1988 FRINT"aS" 

€£08 PRINTTAB<18)" 


EIN LERNPROGRAMM VO 
SVEN NESSELTRAEGER 
<C) BY SVEN NESSI SO 


COPYRIGHT JULI 1938 


IE IE IE | 
rd p; 
Se" 
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CB-TEN-CODE-ABGEKUERZT - 


[| 
" 
= 


für den Commodore 64 


Kl 
mind m 
LEE 


nina is 
Ch ni 


IT; 


DEE 


a! 


DON CE u en Se 
Zu on 


= 


iM! 


DENIED LIT IÄNE 


Dh fh en eh De De Demi 
Lk fe Pe, a me 1 


N - 


FT - 
4 - 


5s32390,08 


x 
‘31 


REM 


SÖÜHDERZEICHEN 


az 


Ir "0 
u" 
ID r 
I El) 
win 
gu 


ee 
Ren 
En 
sin 
nn 
ag 
FE 
so 
ern 
ap 


"gr P 


= EHRF ES 


CHE 
CHRF 1035 
CHEF 152 

- 
ECHRE$ 142 
CHRFEIIER 
EHREÜLETE 


= CHEFS) 


= CHR$L1272 


CHREL153) 
UHREL 45) 
CHREC1HTI 
CHR 5 

CHREL 31. 
CHR 28) 


= CHRIFG 


CHR&E1453 


CHRFEISTO 


= CHR&I 235 


EHRE 
CHEF 173 
CHEF 1232 
HF 124 
CHEF 144 


Ü= +P 
SHIFT+H 
SHIFT+HN 
ETRL +3 
CTEL +4 
SHIFT+H 

= +H 
SHIFT+L 

C= + 
SHIFT+E 
TASTE - 
SHIFT+HÜLRSHUME 
= + 
CTEL +7 
CTEL +3 
SHIFT+CRSRT 
TASTE CRSRT 
SHIFT+CHRER- 
THSTE CRSR+ 
ETEL +2 
SHIFT+HÜLRSHÜME 
TA=TE Fi 
In=TE F3 
ETEL +1 


SYEH NESSELTERESER CE-TEN-CODE 


31 


PRINTTAB(18I"/ 
PRINTTAB<“199"'2 
PRINTTAB<13>" 
PRINTTABXISI" 
PRINTTAB<137" 
PRIMTTAB! 13." 
PRINTTAB<18>" 
PRINTTAB(1E>*" 
FRINT"'SO" 
PRIHT” 

PRINT" 

PRINT” 

PRHNT” 

PRINT" 

PRINT" 

PRINT" 

FRINT" 

PRINT" 
FRINT"" 
PRINT" EIN LERNPROGRAMM 
PRINT" COPYRIGHT JULI 1 
FORQ=1T06666 :NEKXTQ 
POKES32E0,1:FOKES32S 
PRINT" IS" 

REM DIMENSIONIEREN DER ZEICHEN 


S 
% 
> 


bern kg 
IE I I IE 
m; 
gekkuk KK k 
ML. 
u 
| «| Su 


N 


> 
N 
? 
N 


mim ım 
ae 
Er 
uimımm . 

d, 


ur kin ki ka hs \ 
N 


7 
NL 


‚14 


468 Fi=1:F2=14:R=d:F=d:L=® 
4€E5 DIMAS(69) ,Br(33) ,C$(69) ‚D$(33) 
470 REM TEN CODE 
438 AELE)="-1riAsll)="-2" 
gE2 ASl2)="-Zrimscy)="-4" 
434 AEl4)="-Stinzis)er-g" 
483 Asi6)="-Prinsl7j="-g" 
438 FiElBI="-HriASCHI="-19" 582 
452 ASCIO)="-11"ıASC1l)="-12* Isa 
434 ASlI2)="-13":ASCI3I="-16" Iogg 
496 Ast14)="-17"A$C15I="-18" Ion 
498 Asl16)="-19":ASC17)="-20" |ogg 
588 As(18)9="-21"iAsk19)="-22" |oga 
502 Ast2a)="-23"inzcaly="-24" (sy, 
584 Astaa)="-25"ins(23)="-26" Iogg 
506 As(24)="-27"1A$(25)="-28* |syg 
508 A&ı26)="-29" 1 A$l27)="-30* | oo 
S12 AsC23)="-32":m#029)="-33* |g92 
514 AS(30)="-34"1A$C31)="-35* [co4 
516 AF(32)="-36":1AFK33)="-37* (gog 
5138 A$(34)="-38"1AS(35)="-39* [ggg 
520 nE(3E)="-41":A8K37)="-42* (oo 
522 NS(38)="-43":A$C39)="-44" | 515 
524 AS(40)="-45"iAsc41)="-46" [214 
526 As(42)="-50":A$643)="-60" Ic ıg 
S28 AE(44)="-B2":AS(45)="-63" Io18 
539 AS(46)="-B4"iAsla7)="-65" (gg 
532 AEC48)="-67"inS(49)="-69" (as 
534 AS(Sa)="-7ariAscsı)="-71" |ang 
536 As(S2)="-73"1As(53)="-74" (gsg 
538 As(54)="-75"1A$(55)="-77" (ass 
548 AFSEI="-S1":AS(S7)="-82" |.,0 
542 AS(58)="-34":AS(59)="-85* (655 
544 AELEO)="-E9":ASiE1)="-30" |a44 
S4E As(B2)="-91":AFCE3)="-32" (aze 
548 Asi64)="-S3"1ASCESI="-94" |czg 
550 AS(66)="-95"1AS(67)="-97" [a0 
552 AS(63)="-89":1A5(69)="-200 1 54> 
560 REM ABGEKUERZTER TEN CODE | 544 
562 BE(O)="-Ir:ESCl)="-2" 646 
564 BE2)="-3r:BE(3)="-4" 648 
566 B$(4)="-StiBEiS)="-6" 650 
S68 B$(ö)="-7r3B$(7)="-8% 652 
578 BS(B)="-I"r:B$(9I="-19" 854 
572 BS(1O)="-11":BEC11)="-12" |ose 
574 BESC1EI="-13":BEC13)="-14" |osg 
576 B$(14)="-15":B$C15)="-16* os 
578 BECISI="-17":B8C17)="-18" 
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vVoN",,„"BEVEN NESSELTRAEGER" 
984 BY",,"WM SVEN NESSI SOFTWARE” 


BE(C1SI)="-19:BEC19)="-209" 
BEC2O)="-Z1 I BEA U Y="-22* 
BE(22)3="-23":BE(23)="-24" 
BE(24)="-25":1BEl257="-26" 
BEC26)="-27":BEC2I="-28" 
BEl2S)="-2ZIr I BE2II)=N-39" 
BECIB)I="-31r:BEC31)="-32° 
BELIBZYI="-33":BECIZ)=N-34" 

REM ENDE 

REM TEN CODE TEXT 

CE£(B)="SCHLECHTER EMPFANG" 

C£t1)3="GUTER EMPFANG" 

C$(2)="FUNKVERKEHR EINSTELLEN" 
C$(3)="0.K.,FUNKSPRUCH VERSTANDEN" 
C$(4)="FUNKBOTSCHAFT BITTE WEITERLEITEN" 
c£5)="BIN BESCHÄAEFTIGT, BITTE WARTEN" 
C$(6)="SENDESCHLUSS, ENDE, HOER'AUF" 
C$(7)="BIN EMPFANGSBEREIT" 

C$(3)="BITTE WIEDERHOLEN" 
C£(9)="FUNKGESPRAECH ABGESCHLOSSEN,GEHE AUF 
C$t18)="DU SPRICHST ZU SCHNELL" 

CEL11)="HÄABE BESUCH" 

C$i12)="INFORMIERE UVEBER WETTER UND STRASSEN- 
C$(C13)="BITTE ABHOLEN BEI.....* 
C$i14)="DRINGENDES GESCHREFT" 

C$(15)="ETWAS FUER UNS 7" 

EC$t1E)="NICHTS FUER DICH,ZURUECK AN ZENTRALE" 
C$(17)="MEIN STANDORT IST.....* 

C$C1&)="RUFE UVEBER TELEFON AN" 

C$(19)="MELDE DICH BEI 
CElEzU)="EITTE WARTEN” 
C$(21>="ERLEDIGE LETZTEN AUFTRAG" 
CH2Z2)="KANNST DU.....ERREICHEN 7?" 
C+(c23)="IGNORIERE LETZTE NACHRICHT* 
C£(24)="ICH WECHSLE AUF KANAL. 2..." 
c$(25)="MACH ANGABEN VEBER DEINE STATION" 
C£(26)="ZEIT IST VORUEBER FUER FUNKVERKEHR *® 
C$(27)="ENTSFRICHT NICHT DEN CB-REGELN" 
C$(23)="ICH GEBE DIR EIN TEST-SIGNAL" 
C$C23)="NOTRUF AUF DIESER STATION" 


Compuhe mib 


STANDBY" 


ZUSTAND" 


662 
664 
666 
668 
E72 
674 
676 
675 
6808 
682 
634 
686 
683 
698 
632 
654 
696 
638 
708 
792 
a4 
786 
798 
718 
iS 
zı4 
7ı6 
718 
728 
re2 
24 
726 
728 
738 
732 
734 
736 
733 
ac 
742 
750 
752 
54 
756 
758 
768 
762 
784 
768 
778 
772 
7-4 
776 
778 
780 
‚32 
,s4 
756 
738 
738 
32 
‚94 
796 


8aa 
802 
04 
SoE 
803 
818 
sız 
iq 
sie 


735 Ds(22)="ANGEKOMMEN” 


C$(39)="AERGER ODER SCHWIERIGKEITEN AUF DIE- 
C$(31)="VERTRAULICHE INFORMATION" SER STATION5BENOETIGE HILFE* 
C$(32)=*"DIE GENAUE ZEIT 1ST....." 
C$(33)="ABSCHLEPPDIENST WIRD GEBRAUCHT IN/BEI” 
C$(34)="KRANKENWAGEN WIRD GEBRAUCHT INYBEI..." 
C$(35)="DEIN FUNKSPRÜCH WURDE WITERGELEITET" 
C$(36)="BITTE GEHE AUF KANAL... ..." 
C$(37)="VERKEHRSUNFALL INYBEI.....” 
CEC33)="VERKEHRSSTAU INYBEL. se..." 

C#(393)="ICH HABE EINE NACHRICHT FUER DICH" 

C$c48)="ALLE STATIONEN IM GEBIET BITTE MELDEN" 
C$(41)="AUTOFAHRER HELFEN" 

C$(42)="KANAL UNTERBRECHEN" 

C$(43)="WAS IST DIE NUMMER DER NAECHSTEN NACHRICHT ?" 
C£(44)="KANN NICHTS VERSTEHENZRUFE BITTE AN" 
C$(45)="FREQUENZ WEITERGEBEN AN... 2." 

C$(465)="FREQUENZ FREI" 

C$(47?)="ERWARTE DEINE NAECHSTE NACHRICHT" 

C$(48)="ALLE STATIONEN BITTE" 

C$(49)="NÄACHRICHT ERHALTEN” 

C$(58)="FEUER IN. ....” 

C$(51)="FUNKSENDUNGEN IN REIHENFOLGE FORT- SETZEN" 
C$(52)="GESCHWINDIGKEITSKONTROLLE IN/AN. s20." 
C$(53)=*"NEGATIV* 

C$(54)="DU VERURSACHST STOERUNG”® 

C$(55)="KEINE VERBINDUNG *® 

C#(565)="RESERVIERE HOTELZIMMER FUER....." 
C$(57)="RESERVIERE ZIMMER FUER.....*" 

C£(58)="MEINE TELEFONNUMMER IST....." 

C$(S9)="MEINE ADRESSE IST....." 

C$(68)="RADIOTECHNIKER WIRD GEBRAUCHT IN..." 
C$(61)="ICH HABE TIV" 


C$(62)="KOMME NEHER AN DAS SPRECHGERAET/ MIKROFON" 
C$(63)="DEIN SENDER IST FALSCH EINGESTELLT" 
C$(64)="PRUEFE DEINE FREQUENZ AUF DIESEM KANAL" 
C$(65)="BITTE ZAEHLEN FUER TEST" 


C$&(66)="SENDE FUENF SEKUNDEN UNMODUL IERTEN 
C$(67)="TESTSIGNAL" 

C$(68)="MIESION BEENDET” 
C$(69)="POLIZEI WIRD IN. ...GEBRAUCHT" 
REM ABGEKUERZTER TEN CODE TEXT 
DECB)="SIGNAL SCHWACH" 

DE<CII="SIGNAL GUT" 


TONTRAEGER" 


D$(325="HELFE MIR SCHNELL* 
828 DEISZI="ZEIT” 

83% REM ENDE 

332 Er="109" 

349 REM MENUE 


DE(2)="STOP FUNKVERKEHR * 858 PRINT"aM MENUE 5 
DEC3)="VERSTANDEN O.K." 358 PRINT" Malail" 


DE(4)="WEITERLEITEN AN. ....*” 8708 PRINT" 2a 1 WM = VEBEN TEXT - ZAHL" 
DS(5S)="BESETZT,WARTEN" 875 PRINT:=PRINT 
DE(E)="AUSSER DIENST" 838 FRINT" a2 M = UEBEN ZAHL - TEXT” 
0#(C7)="1M DIENST" 8385 FRINT:PRINT 
D$(8)="WIEDERHOLE * 88 PRINT" 243 M = ULEBERSICHT ZEIGEN * 


DE(Y)="NEGATIV” 835 FRINT:PRINT 

DE(19)="EMPFANGSBEREIT" sa8 FRINT" 44 8 = PROGkKAMM ENDE » 
DECILI=S"WARTE (STOP)*" 385 FRINT:FRINT 

DS(C12)="AEUSSERE UMSTAENDE " 318 PRINT” arıl 8 =HINTERGRUND FARBLWECHSEL" 
DE(C13)="NACHR ICHT/ INFORMATION” 915 PRINT 

DE(14)="NACHRICHT WEITERGEGEBEN" 928 PRINT" aArFS3 M =VORDERGRUND FARBWECHSEL" 
DE 15) ="BEANTWORTE DIE NACHRICHT" 938 GETS$ 


DS(16)="BIN UNTERWEGS" 
DE(C17)="DRINGEND" 
DE(C13>="CIN) VERBINDUNG*® 
DECISI="STANDORT" 
DS(28)>="RUFE. .... TELEFONISCH" 
DEcC21)="1GNORIERE" 


9348 REM TASTATUR ABFRAÄGE 

s598 IFSS=CHR$(CB43I) THENBOTO 1959 
368 IFS$S=CHR$(D59 ) IHENGU TOZZHRO 
379 IFS&S=TCHRECBSLP THENGOTOSBOBH 
338 IFSSSCHREAıVSE)THENK=19:G0T010008 
338 175$="3" THENGOTO 1B29:REM""=Fi 
1au2 IFS&="B" THENGÜTO 1839: REM" M"=FZ 
108108 GÜUTOSSO 
Fi=sFIt1:POKES3ZSQ,F1:G0T03598 


DS(2Z3)="AUFTRAG ERLEDIGT" 
DE(24)="REPORT" 
DEIESI=S"UNMGEFAEHRE ANKUNFTSZEIT" 
UF<26)="FUEHRERSCHE IN/PASS- INFORMATION" 
ÜE(27)="LNFORMATIONEN VEBER DEN EIGENTUEMER" 
DE(23)="PRUEFUNG" 

b$(29)="GEFAHR* 

DE(3B)="TREFFEN" 

DE(31)="UNTERSTUETZUNG NOTWENDIG" 


Compube mi 33 


REM FARBWECHSEL 
F3=F3+1:POKES3281,F3:60T0338 

REM MENUE 2 

PRINT " Jepunpg " 

PRINT" aim TEN ----- CODE ":PRINT 
FRINT” a2 m ABÖEKUERZTER TEN CODE":PRINT 
PRINT” a 3 ® ZURUECK ZU MENUE 1":PRINT 
GETS$:REM TASTATURABFRÄGE 

IFS$="1"THENGOTO115® 

IFS$="2" THENGOTO2698 

IFS$="3"THENPRINT "3" 1GOTOSSO 

GOTO 1938 

:REM 

PRINT" ee ES FOLGT DIE VEBUNG" PRINT 

PRINT" TEXT - ZAHL TEN CODE" 

PRINT" SIE SEHEN IMMER EINE SATZ AUS DEM TEN 


BLODE ": PRINT 


PRINT" SIE GEBEN BEI EINGABE BITTE AUCH IMMER Mid 18-XX M EIN" 


FORM=1T04444 :NEXTM 


PRINT " Jap WIEVIELE FRAGEN ??": INPUT "ARRBI" ;Z$ 


IFVAL (235) >OTHEN2938 


PRINT" a FALCHE EINGABE": FORM=1TO2222 :NEXTM:GOTO2099 


F=8:P=8:T=1 
Z=eVAL(ZE):FORB=OTO2 :L=X 
IFB=2THEN18880 
x=RND<(-TI) 
8=INT(E3#RND (BO) > +1 
GOSUB4U0098 

FPRINT:FRINT 


F PRINTCSCK)ISPRINTIPRINT: INPUT"EINGABE "zWUE 


IFWS=ES+ASCK ) THENGOTO2BOBB 
GOSUB3OEDD 

NEX TB 

REM ENDE 

° 

REM MENUE 3 

PRINT "dejspeig" 


FRINT* aım TEN ----—- CODE ":PRINT 
PRINT" a2 = ABÖEKUERZTER TEN CÜDE":PRINT 
PRINT" 43 m ZURUECK ZU MENLE 1":PRINT 


GETSS:REM TASTATURABFRAGE 

IFS$="1"THENGOTOZ31® 

IFS$="2" THENGSOTO29338 

1FS#="3" THENPR INT" "6010859 

GOTO2258 

:REM 

PRINT" Jemen ES FOLGT DIE VEBUNG" PRINT 

PRINT" ZAHL - TEXT TEN CODE" 

PRINT" SIE SEHEN IMMER EINE ZAHL AUS DEM TEN 
PRINT" GEBEN SIE DEN TEXT EIN " 

FORM=1T044344 :NEXTM 

PRINT” age WIEVIELE FRAGEN 27": INPUT "ek" ; 
IFYAL<2Z$) 3OTHEN233O 


ALODE":PRINT 


2% 


PRINT* FALCHE EINGABE" :FORM=1TO2222:NEXTM:GOTOZS6O 


F=0:P=8:T=2 

2=VÄAL (ZE):FORB=OTOZ :L=K 

IFB=2 THEN100993 

*=RNDC-TI) 

*=1INT(E3XRND (CO) > +1 

GOSUE4OB09 

PRIHT:PRINT 

FRINTA£ZCX):PRINT:PRINT:S INPUT"EINGABE "Us 
IFWE=SC$(X ) THENGOTO299888 

GOSUBIHOARO 

NEXTB 

REM ENDE 

REM 

FEM MENUE 4 

FRINT " dutapın" 

PRINT" a4 ı = AEGEKUERZTER TEN CODE ":PRINT 
PRINT" a2 8 ZURUECK ZU MEIWE 1":PRINT 
GETS$S:REM TASTATURABFRAGE 

IFS$="1" THENGOTO27QB 

IF5$="2*" THENPRINT” I": GOTOSSQO 

GOTOESS5HO 

REM 

FRIMT "use ES FOLGT DIE UEBUNG" SPRINT 


enib 


2728 
27398 
2749 
e750 
27€£8 
2770 
2738 
27930 
2308 
2320 
23398 
2348 
2859 
2368 
28708 
2339 
2389 
818 
23508 
2348 
2950 
2378 
[421714] 
2998 
3888 
3918 
3928 


PRINT" TEXT - ZAHL ABGEKUERZTER TEN CODE * :FORM=1TO222:NEXTM 
PRINT " „Jupasur WIEVIELE FRAGEN ?7?": INPUT"IABBI" ;Z$ 

IFVAL (<Z$) 8 THENZ2769 

PRINT* FALCHE EINGABE”: FORM= 1 TO2222 :NEXTM:GOTOZ730 
F=8:P=8:T=3 

2 =VAL(Z$) :FORE=DOTOZ :L=X 

IFB=ZTHEN10088 

%=RND(-T1) 

8=INTC33&RND (BO) > +1 

GOSUB48908 

PRINT:PRINT 

PRINTDSCX) :PRINT:PRINT:INPUT"EINGABE "US$ 

IFWE=SES+BECH) THENSOTOZEBUODO 

GOSUE3AHOD 

NEXTB 

REM ENDE 

REM MENUE 5 

PRINT" Jeiasrg" 

FRINT*® aı wm NABEGEKUERZTER TEN CODE":PRINT 

PRINT" 42 @ ZURUECK ZU MENUE 1*":PRINT 

GETSS:REM TASTATURABFRAGE 

IFS$="1"THENGOTOS998 

IFS$S="2" THENPRINT"":GOTO8SO 

GOTN2359 

REM 

PRINT’ ES FOLGT DIE VEBUNG" SPRINT 

PRINT" ZAHL - TEXT ABGEKUERZTER TEN CODE ":FORM=1TO2222:NEXTM 


3858 PRINT "Ian WIEVIELE FRAGEN 27": INPUT’EREBI" ;2Z$ 

3848 IFVALC2$) >BOTHEN3BEO 

3858 PRINT” FALCHE EINGABE": FORM=1TO2222:NEKTM:GOTOSOSO 
3868 F=0:P=9:T=4 

3979 2=VAL(2ZE):FORB=8102 :L=K 

3858 IFB=2THEN1BDOAD 

598398 KR=RNUC-TID 

31808 R=INFC334RHD(B) > +1 

3122 GUSUBgAH1A 

3130 PRIMNT:PRINT 

3140 FRINTESCK)I:SFRINTSPRINT:INPUÜT"EINGABE "WE 

3159 IFWE=SDE(X > THENGOTO2ZHQOBB 

3169 GOSUBIBHOH 

3179 NEXTE 

3188 REM ENDE 

31989 REM ENDE DER AUSWAHL 

101820 FRINT”’AM":POKES32SO,25FOKES3IESL,ES 

18018 PRINT"D" 

109208 FRINT" = - 1 

18838 PRINT" / nn AN AL ? ar Sa 4 a” 

18698 FRINT" Fr] w- gun dgmı a wı 4 wu" 
180858 FRINT" syaeil_ eweunyaı get Demi mL. " 
18858 PRINT" am A wemuu guı am sei am 1" 
18878 PRINT" a EEE r, Su Burn Dun u | Bu" 
18838 PRINT” sel zu 3 ms Jule mL." 
120838 PRINT" au 1 as a3 Baar ar ae A" 
18109 PRINT" a “w- gar we a4 vw o.ä u" 
13185 IFK>’=1ATHENPR INT" asteigg" 1 GOTO18170 

18118 FRINT"Q aM DER UEBUNG ME" 

1061209 FRINT"’M TESTERGEBNISS It!" 

18130 PRINT"M vVoN "7233" FRAGEN HABEH SIE * 

18148 PRINT" *"3P3" FRAGEN RICHTIG UND" 

18158 FRINT" *7F3" FRAGEN FALSCH BEANTWORTET" 

12155 GGSUEIIBOO 

10168 FRINT"A DAS ERGIET DIE BENOTUNG 28"7B$; "w" 

18170 PRINT" BEE" TAB<CSBY" TASTE m" 

10180 GETOE: IFGÜ$=""THENIOLSO 

13198 PRINT" Jslaagurpy" 

10288 FRINT” WOLLEN SIE NOCH EINMAL 7 XKJ/ZND" 

102108 GETQ&$: IFQS=""THENI192198 

102208 IFQS="J"THENPRINT"W"SRESTORE SCLR:GOTO43B 

10238 IFQs="N" THENFRINT"" SEND 

18248 GCTolaz1a 

18258 END 

11084 IFP>=S4OTHENBE=S"UNSCHLAGEHR " 


Compube mib 35 


11818 IFF>=3BTHENBS="SEHR GUT" 

1120 1FP<=3BTHENEF="GUT" 

119338 IFPX=ZEHTHENESF= "SCHLECHT" 

1146 IFFYV=1NTHENB#F= "MEHR UEBEN” 

11058 IFP<=BTHENBF="VERCESSEN SIE'S" 

ııosa : 

11379 RETURN 

19359 END 

zea8ö2 PRINT"WAN" :FUKRESSESI1,O:FOKESSZSO,O 

28HU18 PRINT" —_.. Fe (m = ” 

26088 PRINT" FALL ANZAMF Ara 7 7 
wi 


28839 FRINT" & wg ah or aıa R| wo.amııy wi" 
23248 PRINT'TO a age gmuızgaıgm gwLsaI am amıamı a m" 
20058 PRINT" 3 ywaııaı au su ua amızmı „" 
eBvea FRINT" 4 wmj yaıumuı _ı2 ai 3m 3e1amı/N” 

29878 FRINT" 3 MT gweıgaLn ang aıauı SU geiz La wen" 
28859 PRINT'TO Se uren Sega am gaıamıl amı zeıawm 49m" 
288982 PRINT me am wa _ m Tr 74 am au w0 m" 
28188 P=P+1 

208118 FORM=1TOZ222:NEKTM 

20128 FRINT"S" :NEXTB 

29139 END 

SaaBa PRINT" MM" :POKESS2E1,5:FPCKES3ZER,A4 

30818 PRINT" u“ dw ——  —— um" 

saazO PRINT" 7 nr nA EINE Pa 2 W722 Da 

32030 FRINT" 3 nn. weıawı ww’ 2 we1ı323e13m1" 

saaaar PRINT 3wL_. 2a ı gg mız = am. zu 3E zu LdMl 
seaS5ea FRIT" 3m 13m ygaıygmı re Ra u au a3mı|" 
zsag60 FRINT" 3 Lu | maı3ml a ww “I _ä we" 

scaro FRINT 2uı zgueıgaıgal_. ig ual_ am ıa mL" 
se@asa FRINT 3 eı guaızgaIıamı 1,7 am am am am ıamı" 
39332 FRINTr am ze am’ a wow ä m am a 

3a1R0 PRINT"MIM" 

zatıa FRINT" IHRE AHTWORT 15T FALSCH" 

38120 FRINT"q RICHTIG 127 3" 


3a13N9 IFT=I THENPRIMTTAELISN "ZT EFHAECH I" 

29140 IFT=ETHENFRTINTTARLEI ZUCKER I ZI " 

29158 IFT=3STHLNFEIMTTABE IST DH ESHBSEN DI" E 

sr1EeN IFT=ITHENPRINTTAB{SI" A" DECHI SR" 

E2I7a IFTS=STHENFRINTFIBITTE 0R5 FROGKRAMM MEU STNRTEN"TEND 
S9175 F=sFti 

=o188 FORM=1TCEEEE:NEXTMEPP INT" I": RETURN 

38130 END 

s2u22 END 

angag FRINT" WAS 13T GER CODE FUER „ı" 

4aB18 RETLIEN 

422990 ENG 

seaano FRINT"I" 
sael9 FRINTIII ai 
5e2a23 FRINT"'ME a2 
seonSQ9 FRINT"A a3 
saman GETOF 

saa5a IFQ#="1"THENGATOS 1009 

snasa IFOE=-"2"THENGNTOSTRAA 

50978 IFQ$="3"THENPRIMT"3":50T0S22 

Ss2a29 GJTOSAO49 

sanso ENG 

sioaa FORF=ATCYQA: IFP >=7OTHENP=O:G9TUS 1979 
51818 PRINT" JeIeie]” 

siaz8 PRINT"IEBI': E++A$&(F) 

5in32 FRINT'ERBBBI";C&$ir) 

51042 PRINT" HaRBBITASTE" 

51950 GETQF: IFN#="" THENS19TO 

SJ050 NEHXTP 

sı1orn FRINT”":COTOSSO 

513323 ED 

ssa02 FORF=9OT034: 1FF>=34THENF=0:GOTCSS079 
53818 PRINT" Jeep" 


TEM CODE " 
RABGSEKUERZTER TEN CODE" 
ZURUECK ZU MENUE 1" 


m ım 8 


Sea29 FRINT"BEBI"SES+BSCP) 58969 NEXTP 
53920 PRINT" WEBER" :DS<P> 5830798 FRINT"J":GOTO320 
E8049 FRINT" EEEBERBITASTE" 53933 END 

seaS59 GETAE: IFOE="" THENS3959 FERDY. 


36 Compute mib 


Robby steht auf einem Fließband, dessen 
Laufrichtung sich ständig ändert. Um sich 
wider der Richtung zu bewegen, können 
Sie ihn mit Hilfe der Tasten "6" und "*" 
Sprünge ausführen lassen. Aber nehmen 
Sie sich vor einer niedrigschwebenden Re- 
genwolke und einer Schlucht in acht — 
Robby drohen Rost und Absturz. 

Am linken Bildschirmrand kann ein Ziegel- 
stein vom Stapel aufgenommen, am rech- 
ten bei seinem Kollegen abgelegt werden. 
Befindet sich Robby entweder am Ziegel- 
stapel oder bei seinem Kollegen, hat das 
Fließband auf ihn keinen Einfluß mehr. Ins- 
gesamt muß er neun (9) Ziegel abliefern. 
Am rechten Bildrand stehen (von oben 
nach unten): 

1. die Spielstärke 

2. die Anzahl der Robbys 

3. die Anzahl der abgelieferten Ziegel 

4. Die Zeit (wird aus Zeitgründen nur bei 


18 V=53248:DI1MFK (45> 


21 INPUT"ZLEVEL (1 BIS 5)"3SL 


23 PRINT"" 

s® T$="EINEN MOMENT BITTE!" 

4a FORR=BTVIY 

42 IFRV=1THENRY=S@:PRINT"i4" :GOTOSO 
44 RVYSI:PRINT"’g" 


60 NEXT 
78 PRINT"S" 


"2 PRINT’@BRFPPESBEIE |UROBEY'< 
"2 PRINT 'IBPPPDPRPEI \ 


18a FOKESS,255:PCKESE,47 
118 FOKES4236, € 


150 POKE2040,11 
151 POKE2041,13 
1E2 FOKEZ042,14 
153 POKE2093,15 
154 FOKE20944 ,252 
55 POKE2095,253 
156 POKE2C46,254 
157 POKI2047,255 


28 PRINT"J":POKES3ES1,7:POKES32SO,7 


e2 IFSL<1 OR SL>STHENPR INT"Q":G0T021 


509 PRINTTARLSS-Rx2) "2" MIOSCT$,1,R+ > "":PRINT"OD" 
55 FRINTTAB(R+2Y"S"MIDSECTE, 1,R+L)"W"IPRINT"OD" 


71 PRINT WEBER E  ————— 
HOUSE 


Robby’s H 


für den Commodore 64 


best. Aktionen aktualisiert) 
5. das Haus (soweit es gebaut ist) 


Den STEP 2-Befehl in den Zeilen 5000 und 
6000 sollten Sie weglassen; dann wird der 
Sprung langsamer, aber geschmeidiger. 


Wenn Sie mit einem S/W-Monitor ar- 
beiten, sollten die Farbcodes der Sprites 
(Zeilen 180-187) geändert werden (grö- 
Bere Helligkeitsunterschiede). 


Sollte ein Tippfehler zu einer Programm- 
unterbrechung führen, können Sie mit 
RUN/STOP und RESTORE oder POKE 
V+24,21 die normale Schrift wieder- 
herstellen. 


In Zeile 20220 stehen die Binärwerte für 
das selbstdefinierte Zeichen "Ziegel- 
stein”. 


<c’el* 


Wu 


128 FOR1=0T079: READO :POKEI12672+1,Q: NEXT 
138 FORI1=8T073:READQ :FOKE 12552+1,Q: NEST 
148 FÜRI=OTOJI7:READG :POKE 12296 +1,Q:NEXT 


145 REM sank kkkkkr SPRITES INITIALISIEREN 


121 Foklvega,ig 
17. DOREY+41,14 
.' PuKEVral, 12 
“= FOREV+43,9 
SE FCh.lCY 44,1 


Varlablenliste: 

V: VIC-Startadresse 

SI: SID-Startadresse 

ZL,Z0: x,y-Position des nächsten Ziegels 
XR,YR: x,y-Position von Robby 

XW,YW: x,y-Position von der Regen- 
wolke 

DL: Zähler für Fließbandrichtungsän- 
derung 

EE: nach EE Schritten ändert sich die 
Fließbandrichtung 

WR: =3 oder =-3; horizontale Bewegung 
der Regenwolke; zu XW addiert 

XF: =3 oder = -3; horizontale Bewegung 
von Robby; zu XR addiert 

2Z: Anzahl der abgelegten Ziegelsteine 
RL: Anzahl der vorhandenen Robbys 

Z: =1; Ziegel aufgenommen (sonst =0) 
$L: Spielstärke (Level) 


V FOREV+AE,1 
03 GOSUE10009 
ib GESUB2S5OHO 
220 FÜKEV+24,2€ 
MEL RL=3 
489 S1:$4272:PCKES1+24, 1S:POKES1+S5,B:POKESI+S ,255 
789 EL_SERICHTENSTRECSLI, 1) 
??® POKEZ11,33: FOKL214,1:SYS58649 :PRINTSLS 
788 FOKE211,33:POKE214,4:SYSS8549:PRINT" IE)" 
7S® ?L=-1:20=214:T185="009080* 


169 FIRL=OTIOEZ:READO :POKETO4 +1,Q:NEXT 
i61 FORI1=9T0O62:READQ:FOKESS2Z+I,QSNEXT 
1Ee2 FORI1=8T062:READO :POKES3S+ TI ,T:INEKT 
183 FERI=SCTOBS2:READQ:POKEIEB+I,Q:NEXT 
164 FÜRIT=DTOE2:RERDO:POKEIGSIES+T ,QINEXT 
1ES FOR I=DTOESSREADO:POKEI61392+1,U:NENT 
128 FÜR1T=0T0T2: FEARADO:PORE IELSE+T,Q:NEXT 
1E7 FÜOR1T=BTOBS2:RUNHDOSFÜKRELIEFZUHL,ASNEXT 
ITO POKELY+ER E24: POKEV +23, 224 

160 FOREV DI, 5 


ı 
8 
I1SE FOKEVY+45,1 
ı 


Compute mi 37 


800 KR=232:IYR=1E3:YW=148 
KW=INTCRNDC1I2139) +59 

820 EE=IINTCRND(C1)430)+<59-<SL#«19)) 
820 PCKEV+S,YR:POKEV+G,KXW 


818 


9934 


9335. REM esse ale leerer HAUPTPROGRAMM 


936 

1098 
1885 
1806 
1807 
19818 
1830 
1045 
198°09 
19€8 
1cE1 
1832 
1953 
1865 
1970 
1858 
1038 
11980 
2354 
ea3s 
2396 
3000 
soıa 
>28 
sao4a 
5095 
3046 
zsearv 
23338 
3950 
=0.58 
2972 
2074 
zoza 
3520 
3518 
0 
3548 
3558 
e1=7- 75] 
3334 
395 
3335 
40990 
4818 
4020 
49934 
435 
4996 
5220 
59108 
soil 
5eı12 
5920 
59398 
5249 
5ıoa 
sııa 
5120 
52934 
5335 
5996 
6098 
6018 
211 
go12 
6029 


POKEV+2,KR:POKEV+3,YR:POKEV+21,235 
POKEV +38 ,B8:POKEV+7,YW 
IFRND<1)<.STHENXF=-3:WUR=3:60T010!0 
KF=3:UR=-3 

GETPS 

IFFS=" x" THENPOKEY +4, SR: GOSUBSO3D 
IFF$="@" THENFOKEV+4,XR:GOSUB6008 
IFKR >= 124ANDKR< = 1S4THENGOTO7808 
IFRR>=SBANDHR { S2S2ZTHENKR=KR+KF 
IFAR<SSOCKKR)=252THENGOSUB3008 
IFÜR=3ANDAW« =2S2THENKWEXWIS:GOTO197O 
1FUR= - SANDKW>=2STHENXW=XW-3:1GOT0 1970 
GOSLBSHRA 

FOKEY r2,KR:POKEV+G KW 

DL=DL+1 

IFOL>=EETHENDL=8:GOSUBABOO 

G0T010:18 


REIS kkkkrkckek ZIEGEL AUFNEHMEN U. ABLEGEN 
° 

IFSRC=IIANDE! =OTHENZ =1:605UB3588 : RETURN 
IFAR>=252ANDE = 1 THENZ=B522=22+1:G0OT03049 

RETURN 

H$=STR$C22) EHH=LENCH$) 
FOKE211,33:POKE214,73SYS55640:PRINTRISHTFCHSE,HH-1) 

FOKE-I+4,33 

FUORD=SOTOZSOSTEPS 
FOKES1,1:FOKEST+1,0:HEXTIFORETEI+4,0:POKESIT,BO:PORESI#H1,O 
iIFZ2=3STHENFONTZ11,34:POKE214 ,22:8Y559848 :PRINT" I "ZCHREIS4)7 "H":GOTOSO74 
IFLZ2=ETEHPOKRE2IL,24:PUOKE214 ,21:5YS5E640 :PRINT"E7&":GUTOSB74 

IT Z=STHENFORL2I1,35:POKE21I,2U:SYS5E6549:PRINT" 'C":CGOTOSEBB 
FOkL211,33:P0KE214,19:3Y553648:PRINT"R"TIS 

RETURN 

FOKESI+4,17 

POKEE1l,1:POKESI+1,2008 

ZL=ZL+1:1F2ZL/ZTHENZL=8:20=20#1 

PORE24i1,ZL:POKE214,20:5YS58648:PRINT"I " 
PCHESI+4,9:7POKESI,B8:POKES1+1,8:RETURN 

FORW=1T0O3898:NEXT:GOTO 11999 

‘ 

REIS kr FLIESSBANDRICHTUNG AENDERN 


IFXF=-3THENXF=3:G0T04928 
xF=-3 
FETURN 


REM eneokkkık SPRUNG NACH RECHTS 
: 

POKEV+21,<PEEK (V+21)) +2:FORY=1T045 
POKEV+4 ,XR+(Y-1) :POKEV+S,FK(CY) 

IFPEEK (V +38) = 12 THENKR=KR+CY-1):G0OTO8998 
IFXR+Y>=255THENGOSUBS188:G0T05839 
DL=DL+1:NEXTIXR=KR+45 
POKEV+2,XRSPOKEV+21,<CPEEK(V+21))-2 
RETURN 

FORS=FK(CY)TO163 

POKEV +4 ,xR+(CY-1):POKEV+S5,S 
DL=DL+1:NEXT:XR=XR+CY- 1) RETURN 


REM kkkkkkk SPRUNG NACH LINKS 


POKEY+21,<PEEK (V+21))+2:FORY=1T045 
POKEV+4,XR-(Y-1):POKEV+5,FK(Y) 

IFFEEK (V +38) = 12 THENXR=KR-(Y-1)1G0O TO8009 
IFAR-Y<=48 THENGOSUBS 108: GOTOSO3O 
DL=DL+1:NEXTIXR=KR-45 
POKEV+2,KR:POKEV+21,<PEEK (V+21>)-2 

RETURN 

FORS=FK(Y)TOL163 

PCKEV+4,SR-(Y- 13: POKEV+S,S 
DL=DL+1:3NEXTEXR=SR-CY-1) RETURN 

‘ 

REM take kt kr rar IN GRÜBE GEFALLEN 
® 
FOKE211,33:POKE214,198:5YS58648:PRINT"R"TI$ 
IF SGHC133-KRI=- I THENSG=-1:G0T07295 

56-1 

D=AHBSC159-XR) 

0=0:0=b/32:POKES1+4,17 

N=32:FORR=8T032 


Compube mib 


J 
D 
G 


SS 
o0 
ss“ 


I 
090% 
sr bb 2 LELwd 


TUN 


SNNNNT 
SSUSN 


a2on 


IN 


wvwuaweooou “ 
G& 
G 


DU@V iw 


an 
90 


go0lO Tr 


e 
£ 


I 


I THEIMR=EKP+OSPOKEV+Z,XR:POKEV+3,YR+R:GOTO?840 
FSG=- 1THENIP=ÄR-Q:POKEV+2,XR:POKEV+3,YR+R 


PCKESI,R:FOKESI+1,32-R:NEXT 


F 


UORESIHA4,129 


PCKESIT,0:POKE:1I+1,10 

FORD =-B8TOSU: NEXT 

Ar =XRaYyIsTR+R 

POKEV+S,KK:POKEV+3,YY:POKESI+4 ,B:POKESIT,8:FOKESI+1,O 
FOrEvV+21,2493 

GSOSEUG1T00R 


i 


FZ=1THENZ =8:505UB 16200 


FCRU=S 1 TOSVEB:NEKT:GOTOSOD 


REIT kl KOLLISION M. WOLKE 


FOKEV+S,KXR:FOKEVI13,FKCVITPOKEVY+E1,241:N=169 
POKEZ11,33:POKE214,18:5YSSE648:PRINT"E"TI$ 


1 


FERY=SIEIANDKR<CSI43FTHENN=SN+3Z2 


PORESI+4,17 
FÜRR=FKı Y3TON 


CKEV+S,HRIFOKEV+3,R 
CKEST,R:FOKESI+I,N-R 


B15 NEXT 
F 


SKESI+4,129 


FOKESI,O:POKESI+L,1Q:FORD=OTUSB:NEXT:FOKESI +4 ,O:POKESI,8:POKES1+1,9 
Ssazd GOSUE15009 


88530 IFZ=1THENZ=A:GOSUBISOODO 

SoSe FERW=1TOIBAD:NEXT:COTOSBO 

304 3 

8555, REM es kekkkackrckkk POSITION REGENWOLKE 
833€ : 

acoda IFWR=FTHENWR=-3:GOTO3020 

5010 WR=3 

90204 PCFEV+E,HW 

AN309 RETURN 

33939 : 

5 REN lkkekk SPRUNGKURVE INITIALISIEREN 
933E ; 

1820@ FIRR=I1TO4S 

10018 FEıRF=169-3945 IN<R/45u1 > 

198920 MEXT 

1802Q RETURN 

13334 8 

10335. REIT ERFOLGREICH BEENDET 
189336 : 

11808 FORD=OTO2SSSTEPS 

11802 FOKESI+4,33:POKESI,1:POKESI+1,D 

11004 POKESI+4,17:POKESI,1:POKES1+1,255-D 

11886 POKESI+4,123:POKESI,1:FOKESI+1,D/2 

11007 NEXT:POKES1+4,0 

11889 POKEV+21,8:POKEV+29,21:PRINT" I" 

11010 FOFES32ZS1,6:PFOKES3Z2SB,14:FRINTCHRE(14) 

11015 TT=-2:T$="| IME:"+TI$:603UB 11500 

11020 TT=5:T$3="W HAST ES GESCHAFFT. AS [AUS IST":G05UB11509 
1103Nn TT=7:T#="GEBAUT - UND _OBBY IST HEIL. *":GOSUB115098 

11858 TT=3: TF="NOECHTEST U NOCH "INS" :GOSUB11508 

11858 TT=11:TE=S"ERRICHTEN ?":60SUB11598 

11050 GETQ£: IFG#=""THENI 1O6O 

11870 IFÜO#£="N"THENPRINT"IU O K M":END 

11050 IFar<Y"1"THENLIOSO 

11039 FRINTCHRE<CIA42I RUN 

11580 TL=LCN«T$) 

11819 RS=\33-TL,72 

11270 FORF=1TOTL 

11530 PCKE211,RS+R:POKE214,TT:5Y558649 :PRINTMIDSXTS,R,1)5 
11548 NEXT 

11550 RETURN 

11994 : 

11935 REM aa kkkkkaakakık KEINE ROBBYS MEHR 
11336 : 

120800 POrREW+Z1,9:POKEV+24 ,21:PRINT"III" 

12018 POKES3231 ,6:POKES3238,14:PRINTCHRS$(14) 

12020 IFZ2<=3THENI2050 

12839 IFZZ>3ANDZ2<=68THEN12108 

120938 IFZ2>ETHENI121SO 

120858 TT=4:T$="-uU WARST EBEN MAL BEI DEN |RUNDMAUERN. *":GOSUB115808 
128658 TT=6:T$5="TIN SCHWACHES IILD. OILLST":GOSUB1159B 

120878 TT=8:T$="-U ES NOCHMAL":GOSUB 115808 

120888 TT=18:T$="VERSUCHEN ?":60SUB11508 

12050 GOTO11968 

12108 TT=4:T$5="|AhR NICHT SO VEBEL. MMERHIN BIST" :GOSUB1 1580 
12118 TT=6:7#="U ZUM ACH GELANGT. ":60SUB 11598 

12120 TT=8:T£="NOECHTEST —U NOCH EIN IAUS IN @NGRIFF":GOSUB11508 
12128 TT=18:T$="NEHNEN ?":GOSUB 11588 

12148 GOTO11958 

2150 TT=4:T$="H5 15T @ERGERLICH. 00 NUR NOCH DER" :GUSUB11508 
12168 TT=5:T£="4CHORNSTEIN FEHLTE. #BER -—U":GOSUB11588 


Compuhs mib 


39 


121708 
12189 
12199 
12934 
123385 
12996 
13998 
13018 
13029 
15994 
15998 
1593C 
1ea29 
16918 
16.020 
170358 
16940 
1E6=8 
193394 
19935 
199936 
20000 
20918 
20029 
209538 
e9a40 
20950 
zaasd 
202708 
20808 
28939 
2100 
2Rı1O 
ea1ed 
28139 
28140 
e915a 
AIG 
29179 
zsaı?2 
20173 
28180 


25050 
esobeB 
25078 
25050 
2509398 
es032 
25034 
25100 
25110 
ES1EO 
25130 
25148 
25150 
ESIEO 
25200 


25216 


252208 
25239 
252498 
25500 
28023 
E6B816 
26029 
26930 
26949 
23334 
293335 
29336 
30394 
38818 
39028 


40 


TT=8:T£="KANNST ES JA NOCHMAL” :GOSUB1 1508 
TT=19:T$="VERSUCHEN ?":GOSUB 11508 
GCTOL1968 


REM a kaaaakakikiaikkaikicikikk EIN ROBBY WENIGER 
° 

RL=RL-1: IFRL=8THENFORR=1TO1808:NEXT:GOTO 12008 
POKE211,33+<RL+2):POKE214,,4:SYS58648:PRINT"gx" 

RETURN 


REM akkaalaaakckkkaık ZIEGELSTEINSTAPEL NEU AUFBAUEN 

E 

ZL=-1:20=14 . 
POKE211,98:FOKE214,14:5YS593649 

PRINT"EEE" 

PRINT"EEE* 

FRINT"EEE* 

RETURN 


REIS sa kkkrk SELBESTDEF. Z. DATAS 


CATAB,124,68,68,100,180,109,124 
DATAB,16,16,16,24,24,24,24 
DATAB,124,9,4,124,96,96,124 
DATAB,124,4,4,69,12,12,124 
DATAO,64,64,80,124,24,24,24 
DATAD, 124,64,694,124,12,12,124 
DATABO,124,64,64,124,76,76,124 
DATAO,124,4,4,12,12,12,12 
DATAB,124,68,6%3,124,100,100,124 
DATAO,124,693,68,124,12,12,124 
DATAIE,23,20,20,20,20,31,0 
DATAE,188,164,164,168,125,255,0 
DriTnd ‚244,148, 143,244 ,4 ,252,0 
DATAB,1,3,8,13,31,53,127 
LATA213,95,255,85,85,255,85,255 
DATHN224 ,96 ,224,80,88,252,96 ,255 
EATAB,0,9,0,9,20,59,127 
DATAO,8,0,9,224 ,224 ‚224,224 


st, pi 2. nn 


OHTAB,60,126,90,231,126,66,165 Stör' ihn bloß nicht ! I 
are = Vielleicht Findet er ja 

DnTn24,24,186, 126 ,24,24,24,0 . Pe rd Se 

DATA243,243,0,207 ,207,207,0,243 die ich kette ' 

DATAO ‚63, 127,204 ,204,127,63,0 hoche verschlammpt habe ... 


DATAB ,255,255,204,204 ,255,255,08 
DATAB ‚252,254 ,207,207 ,254,252,8 
DATAB.,.932,118,92,118,92,118,0 
DATA128,281,221,221,255,255,85,255 


REIT ka k BILDSCHIRM 
’ 

POKES3281 ,7:POKES3280 .5 

GOTO26009 

FRINT"" 

FORR=BTO1E:FORS=ETGO31 

FOKESSESIG +5 +40 +R ,& 

NEXT:NEsT 

FORRK=OTOSS 

POKESS236 +R+9B +24,6 

NET 

FOKE211,8:POKE214,19:15Y5593640 
PRINT"SEEE" 

PRINT"EEE" 

PRINT"EEE* 
PRINT"IBBEBCCCCOCCCCOEEBBBCCCCCCCCCCCCD" 
PRINT EAAAAAAEREREAAAAAAAAAAAAAA* 
PRINTER AAAHAAANAAAAAA” 
PRINTER AAAAAAAAAAAAA* 
FRINTAAAAANAAAAAAAREFFFFBAAANAAAAAARARAA " 
PRINTAARAAAAAAAAAANAAAAARAAAAAAAAAAAA" 
FRIHTÄARARANAAÄAANAAAAAAMAAAAAAAAAAAAAAN® 
FIKEV+21,225 
FOEEV+1O,WISPOKEY+11,INT{RND( 1) #30) +45 
POFEV+12 ,L@:POKEY+13, INTCRNDC1)#39) +45 
POKEV+14 ,W32:PORKEY+1S5,1NT(IRND( 1) #30) +45 
POKEV,254:FOKEV+1,169 

RETURN 

WI=1INT{RND(LYIHBA7TI +24 

WE=INTCRND( 13207 1+24 
W3=1INT{RNGEALIKEOTIH24 

IFABSÄWI -WEI F=SSANDABSCWI-U3) )=4SANDABS (WE -WII?=43THENGOTO2SBIO 
GOTO269299 


REM ara kan aaa aaa aaa kaakakikık SPRITE DATAS 
b 

DATAO,0,9,0,0,90,1,255,192,2,0,96,4,227,176,5,52,2490,9,52,216,8,227,152 
DATA16,8,12,23,248,12,36,438,6,39,243,230,68,52,51,71,247,243,698,48,3 
DATA63,2498,126 ,23,0,236 ,22,255,172,22,0,499,43,0,66,127,123,255 


Compute mib 


DATAB,O,0,0,9,9,1,255,192,3,255,224,7,28,112,6,203,48,14,203,56,15,28,128 


OATAS1,255,252,24,15,252,59,207 


‚254,56,12,30,123,203,2087,120,8,15 


DATA123,207,255,56,15,254,23,255,236 ,22,255,172,22,0,44,43,0,86 


a DATA127,128,255 


DATA1,255,192,3,253,224,7,28,112,6,203,48,14,203,56,15,28,120,31,255,252 
DATA24,15,252,59,287,254,56,12,39,123,203,2087,120,98,15,123,207,255 


OATAS6, 15,254 ,23,255,236 ,22,255,172,22,0,94,22,0,94,22,0,494,43,8,86 


DATA127,128,255 


DATAO,0,0,0,0,8,0,8,0,0,0,8,8,0,0,0,0,8 
DATA9,96 ,248,0,243,248,13,247,252,30,247,252,63,233,252,63,255,1208 


DATAZ7,25%,176,3,255,128,0,2 


52,8 


ONTA8,0,9,0,9,90,8,0,0,0,0,8,9,0,0,0,8,0 


DATA ,69,8,0,65,0,0,690,0,9,4,8,0,93,0,9,60,24,80,9,36,0,93,18,60,60,57 


DATAS6,4,93.153,98,218,173,61,80,181,251,968,155,253,64,79,31,148 


DNTASZ,233,39,127,2549,243,239,2 


DATAB,O,9@,8,0,0,8,0,0,8,0,0,0,0,0,0,0,8 
DATA? ,128,0,15,224,0,31,251,128,63,247,224,63,239,240,63,233,248 


DATA31,255,2490,15,255,224 
DATAO,0,0,0,0,0,0,0,0,0,8,8 
DATAB,®,0,0,0,0,0,8,0,0,0,8, 
bCATA?,192,0,15,248,8,31, eg 
OATA32S5S , 127,255 ,254,63,255, 


FUNKTIONIERT OHNE FRUST: 


53,237 ,215,255,255,127,255,254 ,63,255,252 


KOMFORTABLE SOFTWARE VON DYNAMICS. 


Weil es nicht nur Computer- 
Freaks gibt, bietet Dynamics 
anwender-freundliche Soft- 
ware - komfortabel, menue- 
gesteuert über den Bild- 
schirm. 


Wer also auf seinem 
Commodore C64, dem 
TI99/4A oder den Atari 
400/800- oder XL-Modellen 
nicht lange programmieren 
will oder null Bock auf 
Listings hat, der geht ins 
Fachgeschäft oder Kauf- 
haus. 

Dort gibt es das 
Dynamics „Adres- 
sen-Archiv“ das 
‚Video-“ „Bücher-“ 
und „Schallplatten- 


Dynamics-Software 
gibt es auf 
Computer-Cassette 
oder Diskette. 


Archiv“ Programme, die 
Ordnung halten - einfach 
und flink. Da gibt es neu den 
‚Vokabel-Trainer‘“; der 
Lernen zum Vergnügen 
macht. Fragen Sie danach! 


Wer mehr will, sollte sich die 
Dynamics Arbeits-Pro- 
gramme zeigen lassen. Aber 
auch ‚„Word-Proc“ „Tool 
Pack I und II“ „Calculator“ 
oder „Data-Bank“ bleiben 
immer anwender-freundlich. 


Gut verständliche Bedie- 
nungsanleitungen (keine 
Wälzer!), logischer Aufbau 
und einfache Anwendung 
garantieren, daß computern 
mit Dynamics Spaß macht! 


Also: auf ins Fachgeschäft, 
hin zum Kaufhaus. Weil 
Dynamics Software einfach 
komfortabel ist. 
Ausprobieren! 


D 5° 


COMPUTER-SOFTWARE UND 
COMPUTER-ZUBEHÖOR. 


FÜR ATARI 400/800 UND 
600 XL/800 XL, 
TEXAS INSTRUMENTS TI 99/4A 
UND COMMODORE C 64. 


Dynamics Marketing GmbH, 
Große Bäckerstraße 11, 
2000 Hamburg 1. 
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Squiz ist kein Schießspiel, sondern ein 
- Unterhaltungs- und Denkspiel. 

Nach dem Laden erscheint auf dem Bild- 
schirm der Hinweis "”PLEASE WAIT”. 
Diese kleine Pause ist notwendig, um die 
Daten einzulesen. Danach erscheint das 
Titelbild begleitet von einer Melodie. Es be- 
steht die Möglichkeit, das Spiel mit FI zu 
starten. Nach Drücken der Taste Fl gibt es 
die Spielanleitung aus, welche in engli- 
scher Sprache verfaßt ist. Sämtliche Be- 
fehle und Hinweise sind ebenfalls in Eng- 
lisch beschrieben. Die Übersetzung 
hierzu finden Sie in dieser Spielanlei- 
tung. 

Squiz ist ein Spiel für zwei Personen. Ge- 
spielt werden kann mit zwei Joysticks oder 
mit einem Joystick und der Tastatur. 


« | Bere 
ur den Gommodore 64 


Die Funktionen: 

— zum Bewegen der Steine benutzen Sie 
den Joystick oder die Cursor-Tasten. 
-zum Absetzen der Steine an der ge- 
wünschten Stelle benutzen Sie den Feuer- 

knopf oder die Space Bar. 

— Spielstart durch Betätigen des Feuer- 
knopfes oder Space Bar. 

—- Fl ist GAME RESET, diese Taste kann 
auch während des laufenden Spieles be- 
tätigt werden, um von vorne zu 
beginnen. 


Spielregel: 

Ein Spieler erhält die roten Steine, der an- 
dere die blauen. Der Spieler mit den blauen 
Spielsteinen beginnt. Bewegt werden die 
Steine entweder mit Joystick oder durch 
die Cursor-Tasten. Im Feld rechts neben 


18 REM 2ES2 8238 REERRREERERLEERLERTERERE 


dem Spielfeld erscheint der Befehl "MAKE 
YOUR MOVE BLUE”, jetzt kann Spieler 
blau seinen Spielstein auf das gewünschte 
Feld bringen und durch Betätigen des 
Feuerknopfes oder der Space Bar abset- 
zen. Danach kommt der Befehl für den 
Spieler rot, seinen Stein zu placieren. 


Ziel des Spieles ist es, unbemerkt fünf 
Steine senkrecht, waagerecht oder diago- 
nal in eine Reihe zu setzen oder fünf paar 
Steine vom Gegner wegzunehmen. Gefan- 
gen wird, indem Sie jeweils einen Stein an 
beide Enden des Gegnerpaares setzen. 
Jeweils links und rechts vom Spielfeld 
sehen Sie, wieviel Steine Sie oder ihr Geg- 
ner bereits gefangen haben. 


Im Feld ELAPSED TIME können Sie die 
Zeit ablesen, die seit Spielbeginn ver- 


28 REM s = SESEESE strichen ist. 

fee re: TZERREREN 

58 REM # KRITTEN BY MICHAEL STICKLER ® ER EITTIRTIATITILLETIT 
.—. I I IE TSF TITEL ITTT 
e8 REM a s IT STH TFT TITISETIFTER LT 
98 REM BERRLERKEREEERLREEERRLREEKKRERTERERE 


188 POKES3288 ,8:POKES3281 ,21POKE646,8 BREERNUEREERERM 


118 PRINTCHRS( 147) FORT=1TO111PRINTINEXTIPRINTTAB(14) "PLEASE WAIT.* 
128 CLR:!DIM D(3,2088>,F(3,200),6(3,208) 
138 Sısa272 | 

148 FORI=8TO241POKES+1,8:NEXT 

158 FORI=1T03 


che BENSZIEESTEREREAZRR ANA EN 
ze remoocn,nsrcn II 


188 GC1,JI=INTCFC1,JI/256) 1 FC1,J)=FC1,JI-25626(1,J) 
IFFC1,J)=BANDDCI,J)=BTHEN218 

208 J=J+1:G0T0178 

218 NEXTI 

228 GOTO1838 

238 GOSUB 1488: FA=34272 

248 PRINTCHRS< 147) ıPOKES3281 ‚O1 POKES3288 ,2 
250 FORI=1888T01181:POKEI,67:1POKEI+FA,1S1POKEI+168,67 1! POKEI+168+FA,IS1NEXT Kane 
268 POKE 1887 ,851POKE 1887+FA,15:POKE1182,731POKE11B82+FA,13 Nenn: 
278 FORI=1127T01287STEP48 1 POKEI ‚66:POKEI+FA,1SıPOKEI+15,661POKEI+1S+FA, ISINEXT 

288 POKE 1247 ,741POKE 1247+FA, 1S:1POKE 1262 ,751 POKE 1262+FA,13 Ei 
298 C=55296:FA=54272 

388 A=1924 

318 PRINTCHRS( 19) 1 FORT=1T07 1PRINTINEXT 
328 POKES46 ‚7tPRINTTAB(23) "ELAPSED TIME" 
338 CL=6:1Rs=2 

348 POKEC+42,111POKEA+42 ,851BC=A+4 1 1 UC=A+B1 

358 FORI=1TO17:POKEC+42+1,111POKEA+42+1, 114 1NEXT 


nn 
368 FORI=1T0171POKEC+762+1,111POKEA+762+1, 1131 NEXT ARNSNSEERERZNFGENE 
378 POKEC+68,111POKEA+68,73 BENENESEREN 
380 FORI=OTOB4OSTEP4B1POKEC+B2+1 ,I1HPOKEA+B2+L,IB7IPOKEC+H 1801,11 | | | | I I II TFT 


398 POKEA+100+1,115:1NEXT 
we Paar ae ee 1 ı u 


42 Cosis mit 


4198 
420 
438 
448 
458 
460 
478 
488 
4398 
528 
518 
528 
538 
548 
s59 
568 
579 
589 
5938 
E99 
618 
628 
638 
€48 
658 
668 
670 
680 
6398 
788 
718 
?-28 
38 
748 
758 
768 
778 
788 
798 
308 
318 
828 
838 
848 
858 
868 
878 
880 
838 
908 
918 
3208 
938 
948 
958 
968 
978 
988 
998 


19888 
1818 
1820 
1838 POKECR+O1%,91:POKEC+CCR+O1IY-RA), 11 

1848 BC=BC+49:POKEBC ‚81:POKEBC+FA,2 

1858 POKECR +02%,91:POKEC+(CR+02%-R), 11 

1BE9 IFBC>A+4BBTHENI2S5O 

1078 GOTO1148 

1888 WC=WUC +49 :POKEUC ‚,81:POKEC+CWC-A),EG 

1898 POKECR+O1%,91:POKEC+(CR+O1IY-A), 11 

1188 WC=LC +48 

1118 POKELC ,S81:POKEC+(CWC-A),6 . 

1128 POKECR +02%,91:POKEC+CCR+O2%-R), 11 

1138 IFWCE>IA+418THENI2ESO 

1148 RETURN 

1158 CN/=8 

1168 FORN=1TO1O8 

1178 IFPEEK<CR+O 1%) =81AND<PEEK <C+HCCCR+O1XI -AIIANDISI=CLTHENI299 
11898 CN/=8 

1198 GOTO1218 

1288 CNS=CNÜ+1 


POKEC +762,11:POKEA+762 ,74:1POKEC+788, 11:POKEA+788,75 
K=A+82:FORI1=1T017 
FORQ=1T017:POKEX+Q+FA,11:POKEQ+X,91:NEXTQIK=X+4B:NEXTI 
ER=zAtHA11 

BL=CR:WH=CR: T2=CR 

POKECR ‚81 :POKECR+FA,2 

FORLE =48T0488STEP48 :POKEWC +WE+FA, 111 POKEUWC +WE „78: NEXT 
FORWE=48 TO488STEP48 :POKEBC+WE+FA, 11: POKEBC+LE ‚781 NEXT 
TI$="800098* 

GOSUB1698 

PRINTCHR$( 19) :FORT=1T03:PRINT:NEXT:PRINTTAB (293 
POKE646 ,7:PRINTMIDS(CTI$,3,2)3 "1 "ZRIGHT$(CTIS,2) 
PRINTCHR$( 19) :PRINT:PRINTTAB (24) 3 

IFCL=ZTHENPOKE646 ‚2:PRINT"MAKE YOUR MOVE ":PRINT:PRINTTAB(29)3 "RED * 
IFCL=6THENPOKE646,,6:PRINT"MAKE YOUR MOVE *:PRINT:PRINTTAB<29)3 "BLUE" 
IFFR=1THENES® 

IFPEEK (197) =4 THENCLR:GOTOZ3B 

IFW=8THENA9B 
IFW=BOTHENT2=CR-40 
IFW=2THENT2=CR+1 

IFW=4 THENT2=CR +48 
IFW=6THENT2=CR-1 

GOTO 1688 
IFPEEK (CR) =S1THENRS=11 
FPOKEC +CCR-A),RS 

RS=PEEK (C+T2-A) 
POKEC+<(T2-A),? 

ER=T2 

GOTO498 
IFPEEK (CR) =9 1 THEN?28 
GOSUB 1368 

GOTO498 

IFCL=2THEN?78 
POKEC+(CCR-A) ,6:POKECR,81 
GOSUBS28 

BL=CR : T2=WH:RS=2:CL=2 
GOTOSS® 

POKEC +CCR-A),2 

POKECR ‚81 

WH=CR :RS=6: T2=BL 
GOSUBSZB:CL=6 

GOTO6BED 

IFCL=6THENOP=2 
IFCL=2THENOP=6 
01%=-48:02%=-88:03%=-120:G0SUB378 
01%=-39:02%=-78:03%=-117:G0SUB978 
01%=+1:02%=+2:03%=+3:G05UB978 
01%=+41:02%=+82:03%=+123:G0SUB978 
01%=40:02%=80:03%7=128:G0SUB378 
01%=393:02%4=73:037=117:G0SUBI78 
Ol%=-1:02%=-2:103%=-3:G0SUB378 
01%4=-41:02%=-82:03%=-123:60SUB970 

01%=-160:02%=40:GOSUB1158 

01%=-156:02%=39:G0SUB 1158 

01%=-4:02%=1:60SUB1159 

01%=-164:02%=41:60SUB115® 

RETURN 

IFPEEK (CR+O 1X) <>BIORCPEEK (C+HCCCR+O IK) -AIIANDISI<>OPTHENI 148 
IFPEEK <CR+0 173 <C>B1OR <PEEK (C+CCCR+O1XI -AIIANDISI<>OPTHENI 148 
IFPEEK CCR+02%) <>81ORCPEEK (C+C CCR+02%) -AIIANDI1SI<>OPTHENI 148 
IFPEEK <CR +03) < >38 10R (CPEEK (C + CCR+03%) -A) )ANDIS><>CLTHENI 148 
IFCL=ZTHEN1838 

BC=BC+48:POKEBC ‚,81:FOKEBC+FA,2 


€ wein Kind ‚was 
hat der Onkel von der 
Berufsberatun 


Hami, ich soll 
Space - Invader 
lernen, 

hat er gesagt } 


Compute mik 43 


1218 IFCNZ=STHENI1258 

1228 01%=01%+02% 

1238 NEXTN 

1248 RETURN £ 

1258 PRINTCHR$(193):PRINT:PRINTTAB (24); * ":PRINT 

1268 PRINTTAB(24);* . 

1278 PRINTCHR$<(19):PRINT:PRINT:PRINTTAB<25);5 

1288 IFCL=2THENPOKE848 ,2:PRINT"RED WINS I!“ 

1238 IFCL=6THENPOKE646 ,6:PRINT"BLUE WINS !1* 

1388 FRINTCHRS$( 19) :FORT=1TO21:PRINT:NEXT 

1318 POKEE4S,S:PRINTTAB(4)"PRESS FIRE BUTTON TO PLAY AGAIN. * 

1328 FORX=1T075 

1338 G505UB1699: IFFR=1THENCLR:GOTO238 

1348 NEXT 

1358 GOTO128 

1368 S1=54272:FL1=SI:FH1=SI+1:TL1=S1+2:TH1=SI+3:W1=SI+4:A1=SI+5:H1=SI+6:L1=SI+24 
1378 FORX=SITOS1+24:POKEX ,B:NEXT 

1388 POKEL1,15:POKETH1,1S:POKETL1,15:POKEA1 ,8:POKEHI ‚248:POKEWI ‚65 
1338 FORX=SATOBSTEP-2:POKEFHI ,48:POKEFL1,X:NEXTIPOKEWI , 13RETURN 

1488 POKES=2281,7:POKES3288,1 

1418 PRINTCHRS$(147):POKE646 ,8:PRINTTAB(CI11)5"* OBJECT OF GAME %" 

19428 POKE646,11:PRINT:FRINTTAB(3>*"1 CAPTURE FIVE PAIRS" 

1438 PRINTTAB(I)I" OF THE OPPONENT'S" 

1448 PRINTTAE(3)* STONES BY PLACING“ 

1458 PRINTTAB<S)* ONE OF YOURS ON “ 

1468 PRINTTAB(S3;" ERCH SIDE OF HIS.* 

1478 PRINT 

1438 POKE648,6:PRINTTAB(S)"2 GET 5 CONSECUTIVE" 

1459 PRINTTAB<9)* STONES IN A ROW * 

1508 PRINT:FORT=1T048:PRINTCHRS(99) 5 :NEXTIPRINT 

1518 POKE6846,9:PRINTTAB(8)" CONTROLS ARE:" 

1528 PRINT:PRINTTAB(3)" -JOYSTICK* 

1538 PRINTTAB(S)" -CURSOR FUNCTIONS" 

1548 PRINTTAB(3)* -FIREBUTTON* 

1558 PRINTTAB(i3)* -SPACEBAR* 

1558 POKE646 ,2:PRINT:PRINTTAB(8)" x#%* Fi - GAME RESET x*+" 

1578 GOSUB1639 

1538 IFFR=BOTHENI157® 

15938 RETURN 

1608 IFPEEK<T2)=187THENT2=T2+17? 

1618 IFPEEK<T2)=11STHENT2=T2-17 

1628 IFPEEK(T2)=113THENT2=T2-688 

1638 IFPEEK<T2)=114THENT2=T2+6839 

1648 IFPEEK (T2)=85THENT2=T2+697 

1658 IFPEEK<T2)=7STHENT2=T2-697 

1668 IFPEEK<T2)=73THENT2=T2+645 

1678 IFPEEK<T2)=74THENT2=T2-645 

1639 GOTOES3B 

1698 J1=<CPEEK (56329 YANDPEEK (56321) ) I FR=B: IFJI=111THENFR=1 

17988 IFJ1=123THENW=6 

1718 IFJL=11STHENW=Z2 

1728 IFJ1=126THENW=O 

1738 IFJ1=125THENW=4 

1748 IFJ1=127THENW=8 

1758 IFPEEK (197)=7THENW=4 

1768 IFPEEK (197) =2THENW=2 

1778 IFPEEK(197)=6B8THENFR=1 

1788 IFPEEK (653) =1THENI1888 

1798 RETURN 

1888 IFPEEK (197)=7THENW=® 

1818 IFPEEK<197)=2THENW=S 

1828 RETURN 

1838 POKES3281,15:POKES32898,9:POKE646,2 

1848 PRINTCHRS( 147) 3CHR$( 19) :FORT=BTO4:PRINTENEXT 

1858 PRINTCHRS$(18)3 

1868 PRINTTAB(6)* "TAB(CI2)Y" "TAB<IBI" "TABC22)" "TAB(C24)* er) 
1878 PRINTTAB(28)" " 

1888 PRINTCHRS$(18); 

18939 -PRINTTAB(EI* "TAB(12)* "TABCISEI" "TABCISI" "TAB(22)" "TAB(25)" "TAB(32)" " 
1988 PRINTCHR$(18)> 

1918 PRINTTAB<6S)* "TABCI2EI" "TABCIEI" "TABCIBI" "TABC22)" "TAB(2SI)*" "3 
1928 PRINTTAB<29)* ei 

1938 PRINTCHRS(18)5 

1948 PRINTTAB<CI1O)" "TABCI2)" "TABCISI" "TABCIBI" "TABC22)" "TAB(2S5I" "7 
1958 PRINTTAB(23)" * 

1969 PRINTCHRS$(C 18) 

1978 PRINTTAB<E)* "TABCI2)" "TAB(18)" "TAB(24)* "TAB(28)* “ 
1988 PRINT:PRINT:POKE6846,6:PRINT* WRITTEN 1984 BY MICHAEL STICKLER." 
1938 PRINT:PRINT:PRINT:PRINT:POKE6846,8:PRINTTAB(S)"PRESS Fi TO START GAME* 
2888 POKES+24,15 


Compuhe mib 


2818 
2820 
2938 
2848 
20508 
2068 
2978 
20808 
28938 
21808 
2118 
2128 
2138 
2148 
2158 
21698 
2178 
2158 
2198 
2208 
2218 
2220 
2239 
2240 
2250 
2268 
2278 
2238 
2298 
23@8 
2318 
2328 
2338 
2348 
2359 
2368 
2370 
2388 
2338 
24908 
2418 
2420 
2438 
2448 
2458 
2468 
24708 
2a5Q 
2430 
2500 
2518 
2520 
2539 
2540 
25508 
esea 
25708 
2550 
2598 
2608 
26198 
zerA 
26308 
2649 
2658 
2668 
2678 
2688 
2698 
2788 
27108 
2728 
2738 
2749 
2750 
2768 
2778 
27808 
2790 
23608 
2818 


W1=64 
POKES+2,255:POKES+3,0® 
POKES+S5,9 

POKES+6,8 

w2=32 

POKES+12,9 

POKES+13,®8 

W3=64 

POKES+17,3 
POKES+19,58 
POKES+28,8 
J=8:K=8:1L=8:T1=T1:T2=T1:T3=T1 
IFPEEK (197) =4THEN238 
IFT1=<TITHENGOSUB2 199 
IFTZ=<TITHENGOSUB22S59 
IFT3=<T1THENGOSUB2298 
G0T02138 
ONIGOTO2 198 ,22590,2298 
J=J+1:T1=T1+D(1,J) 


IFD<1,J)=BOTHENFORK=1TOSBB :NEXT:POKES+4 ‚WI :POKES+11.,WE:POKES+18,W3 


IFD<(1,J)=B8THENGOTO2808 

POKES +4 ‚,W1 
POKES,F<1,J):POKES+1,6(1,J) 
POKES+4 ‚WUUI1 +1 RETURN 
K=K+1:T2=T2+D0c2,K) 

POKES+11,WE2 
POKES+7,F(2,K):POKES+8,6(2,K) 
POKES+11,W2+1:RETURN 
L=L+1:73=7T3+D<3,L) 

POKES+18 ‚13 

POKES+14 ,F(3,L):POKES+15,6(3,L) 
POKES+18,W3+1:RETURN 

DATA30 ,4851 

DATASO ‚5497,30 ,4851 ,30,6063,30,4851 
DATA39 ,6430 ,30 ,6069 ,,38 ,5497 ,38 ,4858 
DATA39 ‚5497 ,30 ,4050 ,30 ,6063,30 ,4050 
DATA398 ,6438,30,7217,30,8181,30,4058 
DATA30 ‚5407 ,30,4050,30,6069,30,4058 
DATA38 ‚6430 ,30 ,6069 ,30 ‚54987 ‚38 ,4850 
DATASO ‚5407 ‚30 ,4850,30,6069,30,4817 
DATÄEO ‚5407 ‚30 ,5497 ,30 ,4050 

DATA3B ‚5407 ‚30 ,4051,30,6069,30,4051 
DATA3B8 ,6430 ‚38 ‚6969,30 ,5497 ,38 ,4858 
DATA30 ‚5407 ,30 ,4050,30,6069,38,4858 
DATA30,6439,398,7217,30,8181,38,4850 
DATA3Q ‚5407,30 ,40850,30 ,6069 ,30 ,4858 
DATA39 ‚E430 ,30 ,6069,30 ,5497 ‚30 ,48508 
DATA30,5407,38,40590,30,6069,380,9817 
DATA128,5487 

DATA32 ‚5407 ‚30 ,4851 ,30,6069,30,4851 
DATA30 ‚6430 ‚30 ,6069,30 ,5497 ‚30 ,4858 
DATA3O ‚5497,30 ,4050 ‚30 ,6069,30 ,4059 
DATA39 ‚6438 ,30,7217,38,9181,30,4959 
DATA30,5497 ,30,4050,30,6069,30,4958 
DATAS30 ‚6430*, 30 ,6069,30 ,5497 ,38,4859 
DATASO ,5407,30,4050,30,6069,38,49817 
DATA128,5407 

DATA3O ‚5407 ,30,4051 ,30,6069,30,4051 
DATA39 ‚8430 ‚38 ,5069 ,30 ,5487 ,30 ,4850 
DATA3O ‚5407,30 ,40850,30 ,6069,38 ,48508 
DATA3® ‚8430 ,308,7217,30,8181,30,4958 
Cr TA3Q ,5407 ,30,4059,39.,6969,30.409508 
DATA38 ‚6430 ‚30 ‚6069,38 ,5407 ‚38 ,4850 
DATA30 ‚5407 ,30,49050 ,30,6069,390,4817 
DATA128,5497 

DATAQ,® 

DATA338,0 

DATA6EDO ‚2783,60 ,2408 

DATA38 ‚2145,30 ,2025,60,2145 

DATASD ‚2025,60,1894 
DATA39,1607,39,1517,608,1351 

UNTASD ‚2703,60 ,2408 

DATA393 ‚2145,30 ,2025,69,2145 

DATASB ‚,2025,60,1884 
DATA38, 16987 ,38,1517,68,1351 

DATASD ‚2703,60 ,2408 

DATA3® ‚,2145,2025,698,2145 
DATASDB ‚2025 ,60,1904 
DATA38,1607,30,1517,698,1351 

DATASD ‚,2703,60,24088 

DATA38 ,2145,2025,60,2145 


2320 
283398 
23408 
2858 
23608 
28708 
2388 
2898 
2988 
2918 
2928 
23308 
2340 
29598 
2968 
2978 
2988 
2998 
39808 
3818 
3920 
39838 
39848 
3959 
3869 
38708 
39889 
38998 
3188 


DATAEDB ,‚2025,60,1894 
DATA38,1687,38,1517,69,1351 

DATASB ‚2703,68 ,2488 
DATA38,2145,2025,68,2145 

DATASO ,2025,60,1994 
DATA38,16987,38,1517,68,1351 

DATASB ‚2703,60 ,2408 

DATA38 ,2145,2025,690,2145 

DATAS® ,2025,69,19394 
DATA38,1607,30,1517,608,1351 

DATAB,® 

DATA1958,8 

DATASB ,2703,60,2408 

DATA308 ,2703,15,2783,15,27803,60,2025 
DATA38 ,2703,398,27083,30,3034 ,38,3034 


DATA1S,3215,15,3215,15,3215,15,3215,60,3034 


DATA45 ,490859,15,3608,45,4858,15,3688 


DATA45,4858,15,3698,45,4050,15,3608,15,3215,15,3834 


DATA68,2703,60,24988 
DATA38 ‚,2783,15,2783,15,2703,68,2825 
DATA30,2703,398,2783,38,3934 ,38,3834 


9ATA15,3215,15,3215,15,3215,15,3215,690,3034 


DATA45,4059,15,3698,45,49598,15,3688 


DATA45,4850,15,3608,45,40858,15,36808,15,3215,15,3934 


DATASB ,2703,60,2488 

DATA38 ,2703,15,2783,15,2783,60,2025 
DATA6O ,4058,68,4058 
DATA38,49859,15,4058,15,4850,60,4959 
DATAS208,0,8,8 
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für den Commodore 64 und Simons Basic 


Auch wenn Sie in Ihrer Schulzeit nicht mehr in den Genuß ge- 
kommen sind, mit Feder und Tinte Ihre Schreibarheiten 
machen zu dürfen, so geben wir Ihnen mit diesem Programm 
die Gelegenheit, sich im Umgang mit Tintenfässern zu 


Das Spiel wird mit Load “FONTAIN 
PEN”, 8 geladen und mit RUN gestartet. 
12 Sek. lang wird nun die Anfangsgrafik 
gezeigt und ein Teilstück des Liedes 
“When the Saints go Marching in” ge- 
spielt. Anschließend wird auf den LOW- 
Resolution Bildschirm umgeschaltet und 
der Spieler gefragt, ob er Anweisungen 
benötigt. Das Programm verzweigt nun 
dem Wunsch des Spielers entsprechend. 
Bei Eingabe von Nein wird wieder zum 
Grafik-Bildschirm umgeschaltet und das 
Spielfeld aufgebaut. Beim Start dauert 
dies eine Weile. Bitte Geduld. Wurde mit 
JA geantwortet, so verbleibt das Pro- 
gramm im Low-Resolution-Bildschirm 
und es werden 4 Seiten Anweisungen an- 
gezeigt. Die Lesezeit wurde mit Pause 
bestimmt, sodaß das Umblättern auto- 
matisch geschieht. Nach der Anzeige wird 
nun ebenfalls zum Grafik-Bildschirm um- 
geschaltet und die Grafik aufgebaut. Der 
Spieler hat nun die Aufgabe den 
FONTAIN PEN von Tintenblock zu 
Tintenblock zu steuern, um diese zu ent- 
leeren. Dabei ist darauf zu achten, einen 
bereits entleerten Tintenblock nicht noch 
einmal zu betreten. Dies darf pro Runde 
nur zweimal geschehen, beim 3. Mal fällt 
der FONTAIN PEN zu Boden. 

Ist der Fontain Pen dreimal zu Boden ge- 
fallen, wird der Tank undicht und läuft 
aus. Das Spiel ist dann beendet. 

Hat der Spieler alle 44 Tintenblöcke ent- 
leert, so werden diese wieder mit neuer 
Farbe gefüllt und warten darauf, aufs 
neue entleert zu werden. 

Das Spiel ist beendet wenn der 
FONTAIN PEN dreimal zu Boden gefal- 
len ist. Das Programm schaltet dann wie- 
der zum Low-Resolution-Bildschirm um 
und zeigt die erreichten Punkte an. 
SCORE und HIGHSCORE. Der Spieler 
kann nun entscheiden ob ein neues Spiel 
gewünscht oder das Programm beendet 
werden soll. Wird ein neues Spiel ge- 
wünscht, so werden alle Variablen zu- 
rückgesetzt und es beginnt ein neues 
Spiel. Soll das Programm beendet wer- 
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den, so wird mit SYS 65129 ein Run- 
Stop/Restore durchgeführt. 


Zum Spielablauf: 

Der Schwierigkeitsgrad steigert sich von 
der 1. bis zur 3. Runde. In der 1. Runde 
hat der Spieler 1. Sek. Zeit um den Joy- 
Stick zu bewegen. Diese kleine Pause in 
der 1. Runde wurde eingebaut, um dem 
Spieler die Möglichkeit zu geben, sichmit 
der Steuerung vertraut zu machen. Diese 
muß nämlich sehr exakt durchgeführt 
werden, was gerade bei den Doppel- 
funktionen (rechts unten, links oben 
usw.) bei einem, sagen wir preiswerten 
Joystick recht schwierig werden kann. 
Jede falsche Steuerung aber, die den 
FONTAIN PEN unter, über oder neben 
das Spielfeld lenken würde, wird nicht 
ausgeführt, sondern der FONTAIN PEN 
stürzt ab. Also bitte nicht wundern, wenn 
es einmal abwärts gehen sollte ohne das 
man einen Grund wüßte, es wurde falsch 
gesteuert. Nun, die kleine Pause in der 1. 
Runde erlaubt es hin und wieder, einen 
Blick auf den Joystick zu werfen. Wem 
dies nach einiger Zeit zu langsam werden 
sollte, der muß nur die Zeile 1480 
löschen. 

Ab der zweiten Runde entfällt diese 
Pause und es geht um einiges schneller. 
Nun heißt es den FONTAIN PEN fließend 
zu Tintenblöcken zu steuern. 

Da aber auch dies nicht allzu schwierig 
ist, kommt nun ab der 3. Runde der RUB- 
BER. Dieser bemüht sich nun, Sie vom 
Spielfeld zu stoßen und wird nun in jeder 
weiteren Runde durch Anwesenheit 
glänzen. 


Einige Tips zur Bewegung: 

Der FONTAIN PEN startet immer in der 
linken oberen Ecke, auch nach einem 
Sturz. Dieser Start läßt sich allerdings 
um ein Feld nach rechts, rechts unten 
oder unten beeinflussen, wenn der Joy- 
stick sofort nach einem Sturz in die ge- 
wünschte Richtung gedrückt wird. Dies 
gilt natürlich auch vor dem 1. Start. 
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Man sollte davon Gebrauch machen, da- 
mit das 1. Feld nicht schon beim Start 
geleert wird. Auch die Felder, die vom 
Start z.B. nach unten führen, sollte man 
erst am Schluß entleeren, damit nach ei- 
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. z nn Fre nem Absturz noch ein Weg frei ist. Denn 
ST 7 VE wie schon erwähnt, darf ein bereits ent- 
342 ®...000...... leerter Tintenblock nur zweimal betreten 
350 2.,.BEDis.:.6 werden ohne abzustürzen. Wie glauben nun 
s60 0...000...... alles gesagt zu haben, da die Instruktionen 
rn a are im Spiel selbst sehr aussagefähig sind 
ee und eigentlich keine Frage mehr offen 
sn u lassen dürften. 

418 8. .CCcCcEC..:;% 

420 B..CC.ll..:.. Zum Listing: 

438 8..CC.CC. Wen es wundern sollte, daß er in der Zeile 
Ag Bi, NEE a 1600 einen Gosub Befehl mit den dazu- 
AIE Man eiuen gehörigen Return in Zeile 1810 findet, 
Gase = EIER obwohl das Proglabel “Farbe” auch mit 


dem Simons-Basic-Befehl Exec aufgeru- 
fen werden könnte, dem sei an dieser 
Stelle gesagt, daß dies leider nicht an- 
ders zu machen war. Simons-Basic er- 
laubt leider keine tiefergehenden Ver- 
schachtelungen mittels Exec, so daß es 
zu der Fehlermeldung “Stack to large” 
kommen würde, zwar nicht bei jeder 
Runde aber es käme halt vor. Die Fehler- 
meldung bedeutet im Basic-V2 “Out of 
Memory”. 


S49 E....CCCC.... 
55a @...CCCCCC... 
SER 8,..CCCCEl... 
s’3 @...CCCCCC... 
350 &...CCCCCC... 
„„.ECCCECC... 
...CCCCCC... 
.,CCCCCC... 
..CCCCCC... 
«..BBBBEEB... 
«.BBEEEB... 


Variablenliste: 
Aund B= X und Y Fontain Pen 
X und Y= X und Y Rubber 


EEE. C und D = Koordinaten “Paint 
650 C...BBBEBB... entleeren 
6> ..BBBEBB... Lund K = Koordinaten “Paint” füllen 
638 C...BEBBBB... RZ = Bestimmen der Multi-Color- 
690 C...BEBEEBB... Farbe 3 


m 

{n 

oO 
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«.BBBEBB... 
718 €....EBBEB.... 


ZR = Zähler für geleerte Tintenblöcke 
AN = Zähler für Seite Instructions 


HIRES1,90:MULTIZ2,5,6:FOKESS 
A=335:E&E=42:1.=7:K=-Lax1.,5:C0=22:D= 
MOB SET 0,13,1,0,1 

2 MOB SET 1,13,1,9,1 


98,98:POKES3231,8 


voL 15:WAVE 1,001O@AAN:ENVELOPE 1,4,2,8,18:1A$=-"JZwSswEIEEISE" 
A2&= "CSS iii ei Seid iSEsd ir EIS Eien 


TH = Zähler 
Tintenblöcke 

EX = Zähler für Repeat-Until 
HC = Highscore 

SC = Score 

R = Rundenzähler 

T = Test ob Feld leer/gefüllt 


für Betreten leerer 


.alle$ = Zuweisung der zu spielenden 


Noten 
Alle anderen Variablen nur Laufvariable 
ohne Wertzuweisungen. 


Steuerzeichen: 

Steuerzeichen wurden so weit als mög- 
lich vermieden, um das Eingeben zu er- 
leichtern, kommen aber in den Noten- 
strings und der Textzuweisung bei High- 
Resolution-Bildschirm vor. 

Es handelt sich dabei um folgende Ta- 
sten (Kombinationen): 

Bei Text um “CTRL und A” und “CTRL 
und B”. 

Bei den Notenstrings um die Funktions- 
tasten: 


$S= CRL/HOME 
=M 

=F3 

=PF5 

H= F7 

= r2 


Alle in reverser Darstellung. 


Programmaufbau: 

200-230 = Musik für Vorspann 
260-710 = Mob Design 

740-770 = Mob's aktivieren, High.-Res. 
Bidl. einschalten 

800-900 = Anfangsgrafik 

920-940 = Abfrage Anweisungen 
970-1000 = Entscheidung abwarten 
1030-1380 = Spielfeld aufbauen 


HIEX=SBIR=U:RZ=B: TH=B:ZR=B:FP=3 


TEXT 
TEXT 
MMOE: 
TEXT 
TEXT 
858 TEXT 
SEA PLOT 
878 FLOT 


5,198, "3Jo01INSCFT "TRESENT",3,2,10 
40,42, "3FONTAIN PEN",2,2, 8 
8,178,110,172,1198,3,1 
15,118," ESIGN AND SOUND" ,1,1,8 
75,125,"3BY",1,1,8 
63,195, "360BE",2,2,18 
?”4,193,2:PLOT 73,133,€ 
74,192,2:PL0OT 73,192.2 
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2398 PLOT 74,141,2:FL0T 793,141,2 

838 TEXT23,165,"310ETZE & IEIER",3,1,3 

saRa TEXT 3,128, "3KC)",1,1,6:TEXT 38,183,"21934",1,1,18 

sıa : 

SEE PAUSE 12:MOB OFFB:NRM:PRINTCHRE« 147) 

938 PRINTCHR&(13):LOLOUR 3,8:PRINTATC18,5ICHRE(C159)"YOU NEET INSTRUCTIONS ? 
349 PRINTATEZ,IBICHRECISEI"C JOYSTICK LEFT = YES RIGHT = NO >" 
959 

Se 8 

378 PRÜC ABFRASE 

sa : IF JöY = 7 THEN CALL ANWEISUNGEN 

999 : IF JOY = 3 THEN CALL ANFANG 

1809 CALL ABFRAGE 

1819 : 

1828 : 

10632 FROR ANFANG 

18498 SC=9:2A=9:A=63:8B=42:C0=22:D=14:R=9:ZR=Q:RZ=B:FP=3:AN=B:ER=B: TH=8 
1858 HIRES 1,8:MULTIO,S,? 


1069 : 

19379 : 

18538 FORK=1+KTO1SSI-KSTEPZAHK 

1839 FORY=24LT0193-24LSTEPSKL i 1410-1440 = Mobs positionieren, Kol- 
1188 LINE X,Y-2%L,8,YraaL,1 lision abfragen, vorbereiten 


1118 LINE X-K,Y-L,X+K,Y+L,1 
1129 LINE K-K,Y+L,8+K,Y-L,1:NEXT:SNEXT 
1138 FOR*=1+24KT01593-KSTEP2*K 


1470-1700 = Joystickabfrage 
1730-1810 = Tintenblocks entleeren 


1148 FORY=54LTO199-24LSTEPEKL 1850-1930 = Neue Runde ö 

1158 LINE X,Y-2xL,X,Y+2%L,1 1960-2160 = Abstürze registrieren 
1168 LINE X-K,Y-L,X+K,Y+L,1 2200-2220 = Variablen für Neu-Start 
1178 LINE X-K,Y+L,X+K,Y-L,1:NEXT:NEXT rücksetzen 

NIen 2250-3190 = Instructions 
ana air 3230-3600 = Auswertung 

- _— 

1218 VOL 15:WAYVE 1,008010090:ENVELOPE 1,6,6,6,6 nn = Betreten leerer Felder 
1258 En en een Alles weitere dürfte sich leicht den PROG- 
1248 FORX=21.2T0159-KSTEP2xK LABELS entnehmen lassen, da diese 
1258 FORY=24LTOI6A-LSTEFGHL immer den Namen des in diesem Ab- 
1258 PAINTX,Y,3:NEXTINEXT schnitt zu bearbeitenden Unterpro- 


1278 VOL 15:WAVYE 1,809819R9889:ENVELOPE 1,6,56,6,6 
1258 EB$="12, Do ouaubhiln 

1238 MUSIC 5,B$:PLAY 2 

1388 FOR3=25 TO1SB-24KSTEP2HK 

1318 FORY=54LTO1393-LSTEPGSAL 

1328 FAINT %,Y,3:NEXT:NEXT 

1338 IF R>BOTHEN VOL B8:CALL STÄRT 

1348 PAINT 18,18,1 

13598 FORK=28T015ASTEFIBO:FAINT %,5,1:NEXT 
1368 FORY=3TO193-LSTEPEXL:PAINT 298,Y,1:PAINT 149,Y,1:NEXT 
1378 FOR#=29T01523:PAINT %,185,1:NEXT 

1538 POKES35281,108 

13938 8 

14898 : 

1318 MOB SET 1,19,1,98,1:MOB SET 8,18,1,8,1 
1428 MMOB 8,AR,B,R,B,8,1 

1438 MMOB 1,359,230,350,230,98,1 

1448 DETECT 8 

14590 : 

1468 : 

1478 FROC JOY 


grammes haben. 


194898 : IFR<1THEN PAUSE 1 

1439 : IF JOY =1 THENB=B-43:D=b-43 

1598 : IF JOY =5 THENB=B+43:D=-D+43 

15108 : IF JOY =? THENA=SA-45:C6=C-22,.5 

1528 : IF JOY == THENA=A+45:C=C+22.5 

15390 : IF JOY =& THENA=A-22.5:B=B-21.5:1C0=C-11.2:D=D-21.5 
1549 : IF JOY =2 THENA=A+22.5:B=B-21.5:C=C+11.2:D=D-21.5 
1559 : IF JOY =6 THENA=A-22.5:B=B+21.5:C=C-11.2:D=D+21.5 
1568 : IF JOY =43 THENA=A+22.5:B=B+21.5:C=C+11.2:D=D+21.5 
1579 : IFAI=6BORA>=39B80RE<=35ORB>=2BBOTHEN CALL AUSLAUFEN 
15388 © RLOCMOB 8,A,B,8,1 

15398 :. T=TEST <C,D): IFT=ATHENCALL ZAEHLER 
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1eoa 
16198 
16528 
1639 
1640 
1659 
1669 
1€79 
1653 
1650 
1708 
17198 
47298 
1730 
1748 
1759 
1768 
1778 
1730 
17998 
18088 
18108 
1828 
1850 
1348 
1859 
1869 
1870 
1839 
1838 
13383 
1518 
1328 
1339 


2250 
2260 
2270 
2288 
2238 
2300 
2310 
2323 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2408 
2418 
2420 
2429 
2448 
2450 
24608 
2470 
2480 
2438 
2508 
25198 
2520 
2539 
2548 
2559 
2569 
25708 
NT 

2538 
2598 
2608 


IFAF=EBORAC=3BBOORB )=350ORB<=2BOTHEN GOSUB 17390 


» IFRE2THEN CALL JOY 

®  8=INTCRND(CTIIR3OO): Y=INTCRND<CTIIK209) 13409 
ı  IFX<=6OTHENKX=688 1350 
:  IFX}=308THENK=308 19360 
: IFY>=2O8THENY=208 1372 
: IFY<=EBTHENY=6O 1929 
: MAOB KR VIR,Y BO, 1 1930 
s DETECT 8 2209 
s IF CHECK<B,1)=SBOTHEN CALL AUSLAUFEN 2018 
CALL JOY 2Baza 
‘ 20598 
” ea40 
FROC FARBE zoso 
: ZR=ZR+1:SC=5C+19 2za60 
: VOL IS:ENVELOPE 1,8,8,8,8 2078- 
: WAVE 1,00810008 zaso 
® MUSIC 2, "CR" 2030 
: PLAY 2198 
: PAINT C,D,® 2118 
s IFZR=44THENCAHLL RUNDE 2120 
RETURN 2139 
8 2148 
8 21508 
: 2160 
PROC RUNDE 2170 
t R=RK+1:RZ2=R2+1 2138 
®  IFRZ>ISTHENRZ=1:FP=FP+1:5C0=SC+1088 2130 
: IFRZ=S14THENR2=15 2208 
ı MMOB 0,10,10,19,10,8,1 22198 
: bIMOB 1,599,250,500,259,0,1 2220 
: SCc=Sc+iog 2230 
s LO COL 8,5,R2:TH=9:2R=8 2240 
CALL FUELLEN 

PROC ANWEISUNGEN 

PRINTCHR$( 147 I)CHR$(14) 

FILL 8,9,49,1,492,7 

FILL 1,8,1,1,42,7:FILL 1,39,1,1,42,7 

FILL 2,0,49,1,42,7:PRINTCHRS$(30) 
PRINTAT<2,1)"\NSTRUCTIONS FOR -ONTAIN "TEN" 


IFAN=ITHENCALL SEITE 2 
IFAN=2ZTHENCALL SEITE 3 
IFAN=3THENCALL SEITE 4 


s 

s 

FROC NAUSLAUFEN 
FP=FP-1:5SC=ScC-100 

RLOCMOB 8,n,225,8,190:PAUSE2 
MMOB 1,359,239,359,230,9,1 
DETECT » 

IF FP>BOTHENCALL START 

VOL 1S:ENVELOPE 1,2,4,8,18 
WAVE 1,898100091 

AS="N CT" 

MUSIC 15,At+A$ıAS$ 

PLAY 2 

REPEAT 

EXsEX +1 

MMOB 08,39,208,39,208,1,1:PAUSE1i 
MMOB 8,30,299,30,208,2,1:PAUSE1 
UNTIL EX>3 

voL 8 

PAINT 390,189,3 

MOB OFFÖ s MOB OFF 1 

PLAY © 


CALL AUSWERTUNG 

° 

‘ 

ß 

PROC START 

ı A=63:B=42:C0=22:D0=14 
eRLL Jay 

‘ 

‘ 


PRINTCHRSC1SEYATC1,4)"IESPIELT WIRD MIT DEM “OYSTICK '"PRT 2' 


PRINT" xXON DER 1.BIS ZUR 4._JNDE STEIGERT - 


PRINT" SICH DER CHWIERIGKEITSGRAD UND BLEIBT 


PRINT" DANN GLEICH!! 

PRINT" „N JEDER _UNDE SOLLEN #IE MIT IHREM 
PRINT" -I/1®,/ "T/ DIE 44 | INTENBLOECKE 
PRINT" ENTLEEREN! 


PRINTCHRE(CZS) :SCENTRE" 71,771” 3" :PRINTCHRS$(156) 


PRINT:PRINT" —UER EINEN GELEERTEN | INTENBLOCK 
PRINT" —UER EINEN ®ATZ VON 44 |LOCKS 190 
FRINT" —UER 14 ENTLEERTE %P IELFELDER 1098 


PRINT" UND EIN ZA 7 T7 


19 


19 


PRINTCHR$C2SI CENTRE" ./F1 1%, 3": PRINTCHR$(156) 
PRINT:PRINT" JELEERTEN ILOCK NOCHMAL IETRETEN 
PRINT” —UER JEDEN #BSTURZ 108 

s 

s 

FLASH 5,3 


PAUSE 5 : OFF 
PAUSE ZB:AN=1:CALL ANWEISUNGEN 


s 
. 


PROC SEITE 2 


PRINTCHRS (283 :PRINT:PRINTECENTRE "9—- JO) 7A 11 2-77 8 "IPRINTCHRSCISSY:PRI 


PRINT" 1. _—UNDE: WEHR LEICHT, FUER JEDE IEWE- 


PRINT" GUNG HABEN SIE 1 9EKUNDE #EIT 


PRINT" 2. _UNDE: UN AUFGEPASST, SIE MUESSEN 
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FRINT" DEN \OYSTICK FLIESSEND BEWE- 

PRINT" GEN.Z/EINE KURZE "AUSE MEHR 1*":PRINT 

PRINT" 45 DER 3. ”R ERSCHEINTZDER —_ 117! zUN 

PRINT" -UNDE: MUESSEN SIE NICHT NUR DARAUF 

PRINT" 4CHTEN EIN BEREITS GELEERTES 

FRINT"” -ELD NICHT MEHR #NZUSTEUERN 

PRINT" ODER NEBEN EINEN | INTENBLOCK 

PRINT® ZU W)PRINGEN, SONDERN SIE 

PRINT* DUERFEN AUCH NICHT MIT DEM":FRINTCHR& (28) :PRINT 
CENTRE" _ 117 II AT-T" 


s 

’ 

FLASH 5,3:PRUSE. 3: OFF 

PAUSE ZB: AN=2:CÄALL ANWEISUNGEN 


PROC SEITE 3 

PRINTCHRE&(CEZES>:PRINTSTCENTRE"T TILL 7 XTNT 7772": PRINTCHRS$(156) 
FRINT:PRINT" AD TINEN BEREITS GELEERTEN | INTENBLOCK 

PRINT" ZUM 2.MAL NZUSTEUERN.-IES DUERFEN SIE 

FRINT" PRO _UNDE MAXIMAL 2 MAL!"SPRINT 

PRINT" B) „EBEN,UNTER O0. UEBER EINEN | INTEN- 

PRINT" BLOCK ZU WPRINGEN! "PRINT 

PRINT" C) “IT DEM _ 117 ZU /OLLIDIEREN !!":PRINT 

FRINT" IE OBEN ERWÄAEHNTEN "UNKTE FUEHREN, 

PRINT" MIT 2USNAHME VON "UNKT A, DA HIER ERST 

PRINT" BEIM 3. MAL, ZUM #55TURZ2 !":PRINT 

FRINT" -IESE $TUERZE HAELT DER TA&7 T7 

FRINT" NUR 3SMAL AUS, DANN WIRD DER TANK 

PRINT" MDICHT UND ER LAEUFT AUS !!1"3PRINT 
PRINTUHRECZSISCENTRE"MG CHTLANM 8/7 LI 1777" 

D 

‘ 

FLASH 5,3:PAUSE S:CcFF 

PRINI" XxUM WTARTFELD AUS SOLLTEN SIE EINIGE 

PRINT" | INTENBLOECKE NACH UNTEN ZU VOLL 

PRINT” LASSEN UND ERST ALS LETZTE "NTLEEREN |! 

PRINT" &NSONSTEN WERDEN SIE NACH EINEM 4B- 

PRINT" STURZ AUF EINEN LEEREN | INTEN BLOCK 

PRINT" KOMMEN UND #1 08@”7_]% GEHT'S !11!":PRINT:PRINTCHR$(159) 
CENTRE Ka TE KTteotf ei 7 

: 

° 

FLASH 5,2 

PAUSE 2 

OFF 

PAUSE 28 

CALL ANFANG 

Ei 

‘ 

% 

PROC AUSWERTUNG 

ASS JCSI II SE" 

VOLISSENVELOPE 1,3,8, 6,8 

MUSIC 4,R$ 

WAVE 1,001088101 

PLAY 2 

NRMSPRINTCHRECIATICHREIISSICHRSEC 14): COLOUR 8,8 

FILL 8,8,948,1,42,7:FILL 1,8,1,1,42,7:FILL 1,33,1,1,92,7 
FILL 2,8,98,1,42,? 

PRINTCHRS(38) :PRINTAT<L,1>" 2.90 07 I er /N 
5C=SC-SAs IFSC>HSTHENHS=SC 

FLASH 5,1:FAUSE 1:0FF 

FILL 6,15,18,1,92,6:FILL 7,15,1,1,92,6:FILL 7,24,1,1,92,6 
FILL 8,15,1,1,92,6:FILL 8,24,1,1,92,6:FILL 9,15,198,1,92,6 
PRINTAT(C1I3,4)"WIE TRREICHTEN 

PRINTCHR&(28>ATC16,8)5C 

FILL 13,12,15,1,92,4:F1LL 14,12,1,1,92,94:FILL 14,26,1,1,92,9 
FILL 15,12,1,1,432,4:FILL 15,26,1,1,942,4:FILL 16,12,15,1,492,4 
PRINTAT<C16,119>" IIGHSCORE 

PRINTCHRSC1S3IATCI1S6,15)>HS 

REM FLASH 3,1:PAUSE 1:0FF 
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FILL 29,8,48,1,32,7 

FILL 21,9,1,1,432,7:FILL 21,393,1,1,92,7:FILL 22,0,499,1,42,7 
ATS" ACER Eur Tg" 
VOLIS:ENWELOPE 1,3,8, 6,8 

MUSIC 4,RA& 

WAVE 1,88198181 

FLAY 2 

PR INTCHRS&(3OYATII,EII” ‘OY LE.= /EU IAME RIGHT = I|IHE "NND * 
s 

8 

FLASH 5,2:PAUSE 1:0FF 

s 

8 

PROC ENTSCHE IDUNG 

: IF JOr =7 THEN CALL ANFANG 

E IF JOY =3 THEN SYS 65129 

CALL ENTSCHE IDUNG 

[| 

8 

FROC ZAEHLER 

ı TH=TH+1:SC=SC-19 

s IF TH >=2 THEN CÄALL AUSLAUFEN 
° IF TH <3 THEN CALL JOY 

END 


TASTATUR-MEISTER® ist da! 


Gibt die schnelle Referenz für Befehle, Optionen und Formate direkt an den Arbeitsplatz - 


BASIC 
Funktionen 


SYNTAX- 
NOTIZEN 


STEUER- 
TASTEN 


Schneller 
Überblick 


STATUS- 
BYTE 


Referenz 


VASTATUIR MATTER Mühe Damumundene. 
> © 


Selchsksenie FARBEN 
ASCII Tabelle zum Aufhängen Tabellen 
(Nicht abgebildet) 


FÜR COMMODORE Gerdan en Bits TASTATUR-MEISTER: 
TASTATUR-MEISTER® VC 20 und C-64 ze 


D per Scheck (zzgl. 5,- DM Versandgebühr) 


@ Befehle vollständig vorhanden, mit voll BASIC nn x 4 DM 29,90 (liegt bei) 
ausgeschriebener Befehlsbeschreibung ® SIMON’S BASIC ü..... x a DM 29,90 
® MULTIPLAN .......... x a DM 29.90 
® Alte Steuertasten übersichtlich ®BANKO nn x 4. DM 27.00 Namen: sr ee 
SCHABLONE aus: @ Wiederstandsfähigem Kunststoff (für eigene Anwendungen) SITHDe. Sat rn se a A a 
@ Dauerhaftem Druck Schablonen auch für IBM-PC erhältlich. 
@ Eingeteilt nach Nutzungsbereichen Das 1.1/2.0, BASIC 1.1/2.0 WORDSTAR, MULTIPLAN 
LOTUS 1.2-3, LOTUS-SYMPHONY, BLANKO PO ns et 


Händeranfragen erwünscht. Hersteller: FRIWA-Vertrieb - Reisingerstr. 6 - 8 München 2 : Tel.0 89/53 04 50 - Telex 5213775 
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Race men 64 


für den Gommodore 64 


Bei diesem Spiel geht es um eın Wettren- 
nen zwischen zwei Läufern auf dem Com- 
modore 64. 

Es ist mindestens ein Joystick nötig, aber 
besser sind natürlich 2. 

Spieler 1 steuert seinen Läufer mit dem 
Joystick in Port 1 oder mit der Space- 
Taste am Computer. 

Spieler 2 benutzt den Joystick in Port 2. 
Gesteuert wird mit der Feuertaste, um die 
die Geschwindigkeit der Läufer zu 
erhöhen. 

Wer am schnellsten drückt, ist natürlich 
auch der schnellere Läufer. 

Wichtig hierbei ist, daß die Feuertaste im- 
mer wieder losgelassen wird, da sonst eine 
immer gedrückte Feuertaste nicht zum Er- 
folg führt. 

Die Punktewertung richtet sich nach der 
Schnelligkeit des Spielers und der 
Spielstärke. 

Je höher die Spielstärke ist, desto mehr 
Punkte kann man erreichen. 


Variablenliste: 

V = Adresse des Videochips 

$I = Adresse des Synthesizer 

1 = allgemeine Schleifenvariable 

$1$ = Printposition für die Punktzahl von 
Spieler 1 

$2$ = siehe oben jedoch für Spieler 2 
T$ = Printposition für die Zeit 

M$ = Printposition für die Anzeige von 


Metern 

1$ = siehe oben 
Spielstärke 

$a = Punktzahl für Spieler 1 

$2 = Punktzahl für Spieler 2 

$ =höchste Punktzahl im Rennen (kein 
Highscore) 

HI = Bestergebnis (Highscore) 

HM = beim Bestergebnis die Länge der 
Strecke 

HI = beim Bestergebnis die Spielstärke 
L = Spielstärke 

T = Zeit 

6 = welcher Spieler gewonnen hat (1 
oder 2) 

A$ = Anrede des Spielers (1 oder 2) 

E = Dauer des Applaus 

1 = Anzahl der noch zu 
Metern 

W = für Verzögerungsschleife 
M = Anzahl der Meter (100-1000) 


jedoch für die 


laufenden 


Programmaufbau: 

000-038: Initialisierung von Maschinen- 
programm und Spritedaten 

100-400: Variable und Bildschirmmaske 
definieren 

420-460: Spielstärke abfragen 

470-490: Länge der Strecke abfragen 
500-610: Count down 

620-630: Schuß 

640-650: Punkte und Zeit auf 0 setzen 
660-730: Hauptprogramm 


140-760: Auslauf der Laufer 

1700: Feststellen wer gewonnen hat 
780-850: Ausdruck wer gewonnen hat und 
Bestergebnis 


Unterprogramme: 

860-880: Wartet bis eine Taste gedrückt 
wurde und löscht oberen Bildschirm 
890: Scroll-Routine ein 

900: Scroll-Routine aus 

910-1010: Applaus 


Adressen für das Maschinenprogramm: 
1001: Geschwindigkeit für die Scroll- 
Routine 

1006: Spielstufe 

32797: Anzahl der Schritte bei Knopfdruck 
für Spieler 2, normal = 1 

32855: Siehe oben, jedoch für Spieler 1 


Ein Tip noch! 

Wenn Sie das Spiel eingetippt haben, dann 
speichern Sie es vor dem Starten ab. 
Der Grund: Wenn Sie Tippfehler im Pro- 


, gramm haben und der Rechner dadurch 


"abstürzt’, könnte somit ein Programmver- 
lust entstehen! 


DATA32,143,128,173,0,220,41,16,208,8,169,8,141,235,3,76,41,128,173,235 
DATA3,201,0,208,16,173,2,2098,1805,2,141,2,203,169,1,141,235,3,76,61,128 
DATA24,173,237,3,109,238,3,141,237,3,194,8,169,8,141,237,3,206,2,208 
DATA173,1,220,41,16,208,8,169,8,141,234,3,76,99,128,173,234,3,201,0,208 
DATA16,173,0,208,105,2,1491,0,208,169,1,141,234,3,76,119,128,24,173,236 
DATA3,1909,238,3,141,236,3,144,9,1693,8,141,236,3,206,0,208,234 ,56,173 
DATA ,208,237,2,208,144,7,173,0,208,141,233,3,96,173,2,208,191,233,3 
DATA3S,173,9,208,201,29,208,3,233,8,208,173,9,208,201,180,288,8,173,8 
DATA203,233,3,141,9,203,173,8,288,2801,181,248,241,173,2,208,201,29,208 
DATA3,233,2,208,173,2,203,201,180,208,8,173,2,2098,233,3,141,2,208,173 

18 DATA2,208,201,181,240,241,96 

11 FOR 1=32768 TO 32375:READ X:POKEI,X:NEXT 

i2 DATA173,232,3,109,233,3,141,232,3,194,9,169,0,141,232,3,24,76,83,3,76 
13 DATA49,234,169,5,133,251,133,253,169,144,133,252,133,5,169,145,133,259 
14 DATA133,3,1693,217,133,49,133,6,162,0,160,0,177,252,72,177,5,72,177,258 
15 DATA145,252,177,3,195,5,208,192,39,2908,243,104,145,5,104,145,252,24,165 
16 DATA2S0,105,49,194,2,230,251,133,250,24,165,252,105,40,144,2,230,253 

1? DATA1S3,252,24,165,3,105,408,199,2,239,4,133,3,24,165,5,105,40,144,2,230 
18 DATA6,133,5,24,160,0,232,224,18,203,179,172,248,7,200,192,248,208,2,160 
13 DATH243,1498,243,7,148,249,7,76,49,234 

2a FCR1=3238T0974 :READX:POKEI,K:NEXT 

21 DATH1E9,69,141,20,3,169,3,1941,21,3,96 

22 FOR1=784T0714:READX:POKEI,X:NEXT 

23 DATAB,0,8,8,8,0,0,20,0,8,31,8,8,31,8,0,60,0,9,44,9,80,184,8,0,186,08,8 

24 DATA186,0,0,186,0,0,186,0,0,117,0,0,85,0,0,21,0,0,60,0,0,68,0,8,40,8 
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td) Add FT Tu fo Mm 
ou 


IN LELUNR-GHOWO 


340 IFASC"L"OFA2' "3" THENASO 

459 L=VALCASI:POKE 1805,L+8:60SUB$70 

JED FRINTLE: "SP IELSTAERKE “SL 

478 INPUT “ Sapppucua ae OIEVIEL \ETER (188-1000) ";M 

430 IFM. 1OBORM) IOBBOTHENGOSUBE70:GOTOA7B 

498 60SUB 878 

s88 FOKE2848 ,242:POKE2841,242 843 FRIIT"Z YPIELSTAERKE: "5HL 

S1B POKEVY+1,180:POKEV+3,135 843 PRINT" . YTRECKE : *3HM 

s28 FOKEV,30:POKEV+2,38 845 GOSUB 860 

E3e POKEV+21,3 858 GOTO 358 

S4® POKESI+5,0:POKES1+6,255:POKESI+1,50 868 FOKE196,8:WAITISS,1 

Ss58 POKE3I+4,33 878 PRINT": FORI=1TOS 

SEO FORI=3TOBSTEP-1:POKESI+24,15 888 FRINT"SG "3:NEXT:RETURN 
578 PRINT" nERPEREERPPPRBBRLE:" ; "U * | 330 POKE 785,68:POKE718,3:SYS7®4:RETURN 

S30 FORLI=SITOSOD:NEKT 908 FOKE785,49:POKE718,234:5YS784 RETURN 

250 PORESIe24.D 918 POKESI+5,8:POKESI+6,98:POKESI+1,208 

Eid FORLEITOSCO:NERXT 328 FOKESI+I2,8:POKESI+13,255:POKESI+8,28 :POKESI+11,129 
Cia NE:r:S03UB 270 530 POKESI+19,0:POKES1+28,25S5:POKESI+15,1 :POKESI+18,129 
202 Fir ESS 129: POKESI+I,S 9348 FORI=BTOISSTEP.BS:POKESI+24,1:NEXT:POKES1+4,17 

830 FORI=1STOOSTEP-.25:POKESI+24,1:NEXT 950 FORX=1ITOE :A=RND (1) #58: FORI=15B+ATOL1SOSTEP-.S:POKESI+L,I 
&98 £1=20:$52=8:1=M SED NEXT 

650 GOSUB 898: TI$5="88980890* 370 NEXT 

569 I=1-PEER.i1081,/69:5YS32768 358 FOKES1+4,129 


78 SYS32763:N=PEEK (V) 
630 SYE3E7ES:S1I=SIFrÄAFLLFCA>IBEB)«-1) 
E98 SYS32768:A=PEEK (V+r2) 

g 


?10 SYS32768:PRINTS187S17S237523 TSIMIDSCSTRECTI/68) ,„2,4):SYS32768 


8208 PRINT"2 EINE +EIT BETRAEGT *"3MIDS<STRECT),2,6)5" YEKUNDEN.* 


DATAO,41,0,8,21,0,0,0,0,170,8,0,0,0,0,8,0,28,8,8,31,8,0,31,8,0,60,8,2 
DAHTA190,12%,15,170,192,60,178,192,15,170,192,3,234 ,255,0,178,0,8,85,8 
DATAO,85,64,3,245,2498,107,192,252,187,0,608,64,0,48,8,8,40,0,0,21,08,8 
GHTAO,0,9,0,0,0,0,0,0,20,0,0,31,0,0,31,0,0,60,0,98,172,0,8,234,0,8,234 
ErTAO,8,224,0,08,255,2498,8,178,0,0,35,0,8,85,8,8,21,8,1,191,8,1,191,8 
CaTA1,40,0,0,48,0,0,21,0,0,0,0,8,0,0,0,0,0,8,0,20,8,0,31,8,8,31,8,0,68 
DATAO,0,16E3,8,3,174,0,15,173,0,3,174,8,98,175,249,0,170,0,08,35,0,0,85 
DATAO,3,213,64,15,195,240,47,0,183,168,1,160,9€,1,128,20,0,64,0,0,0,08 
DATAB,9,9,0,8,8,0,20,0,0,31,0,8,31,0,0,60,8,2,178,128,15,170,192,60,178 
DATAISZ,15,170,192,3,170,255,0,170,0,0,95,0,80,35,64,3,209,248, 107,192 
DATA2S2,197,0,60,&64,0,48,0,0,40,8,0,21,8,8,0,8,0,0,8,0,0,0,0.20,8,8,31 
DATAQ,0,31,0,0,€60,0,0,165,0,0,174,0,0,174,8,08,174,8,0,175,248,0,170,0 
DATAC,SE,0,0,35,0,0,21,0,1,131,0,1,191,0,1,40,0,0,48,0,0,21,8,8,0,0,8 
FOFT=1SISSTGISE7IERERDXTPOKEL,K:NEXT 

FOK.TSSE,50:CLR:V=532481$ 1=549272 

FOFE V+23,3:PCKEV+E3,9:POKEV+Z8,3 

POKEV+3S ,E:PGKEVY+40,2 

FOkREV+38,T7:FOKEV+37,8 

POkKE 32797 ,1 

FOKE 32355,1 

FORI=89TO28:POKESI+I,B:NEXT 


FOKES3280 ‚8: POKES3281 ,0:PRINT "MER" 7 CHRSCIA)SCHRSCB)F :POKEV+21,0 
GosUB 878 

PRINT“ "3 
PRINT’SEI _ACE MEN 64 ® (C) 1984 BY I. _EIMUTH "> 
PN —T—T—T—T—T—— 
PRINT" “; 
22 (Se TEE TEE ET 
FRINT"q “; 
RINg— —, oo oo [oe ee 3 
FRINT"q 5 
PRINT" "3 
Ra — {oo oJ 
PRINT"Z 3; 
PRINT a a Sn 
PRINT" “ 
PRINT" “ 
PRINT’ ”; 
POKESS295 ,5:POKE2823, 168 

PRINT"EEKJ WIELER ı 8 +EIT © ®#IELER 2 % 
PRINT'= „> 


S1$= "5290" :S25= "(EREPDPRPRPRRBBRRRRARRRABRRABBARI“ 


t =" EHSLHIETHL SHELL NETT ] 
FRIT pe Zi YPIELSTAERKE 
POKE 133 ,0:4AIT199,1:1GETASE . 


392: 2 * 


938 FOR1=15TOBOSTEP-.85:POKESI+24,1:NEXT 
1880 POKESI+4,8:POKESI+11,8:POKESI1+18,08 
1818 RETURN 


YS32769:52=5S2+As(L#(A>1OO)«-1) 


5Y332763:PRINTMSE3 INTCIIF "N NETER *:5YS32768 

SYS327E8: IFI>=1THENSSO 
T=T1/60:Ah=PEEKı 1801) :FORI1=ATOBSTEP -„Z5:POKE1881,1:NEXT 

GOSUBSEOO 

FOKE 2040 ,,242:FOKEZO41 ,242 

AE=S"DWFIELER 19*":$5=S1:G=1: 1IFS2>SITHENAS= "BEP IELER 2*:$=52:G=2 

PRINT 'SBDBIS "AS" DU HAST DAS _ENNEN GEWONNEN !*3 

E=20: 1FS>HITHENE =49:HM=M 

IF S>=HITHENHI=5S:HL=L:HP=G:PRINT"AU MUND EINEN NEUEN _EKORD AUFGESTELLT I” 
GOSUBSI18 


PRINT" -IE ERREICHTE "LNKTZAHL IST*S 
GOSUB SEO 

FRINT’AQMIIN IESTERGEBNIS: 5 ”. 
FRINT"Z TUNKTE: "HI 
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Fortsetzung von Seitel 


Im Aula der Firma Tandberg Data GmbH, Dortmund un- 


tersuchte das ERGONOMIG Institut, Berlin, wie weit die 
Sicherheitsregeln und Normen für Bildschirmarbeitsplätze die 
Gerätegestaltung beeinflußt haben. 

Die Untersuchung wurde anhand von 10 Geräten durchgeführt, 
die man in der Klassifikation der Geräte nach dumb (= dumme 
Terminals mit festgelegten Eigenschaften), smart (= Intelli- 
gente Terminals mit herstellerseitig modifizierbaren Eigen- 
schaften) und intelligent (= mit benutzerseitig modifizierten Ei- 
genschaften) als intelligent bezeichnen kann, weil viele Ihrer Ei- 
genschaften vom Benutzer wunschgemäß geändert werden 


Anstelle des relativ schwammigen Begriffs ‘ergonomisch’ wurde 
als Beurteilungskriterium ‘Benutzbarkeit’ gewählt. Die Beurtei- 
lung wurde nicht nach fiktiven Kriterien vorgenommen, sondern 
in Bezug auf die Arbeitssituation eines Sachbearbeiters an ei- 
nem Mischarbeitsplatz in einem beliebigen Tageslichtraum. 


Die ‘Benutzbarkeit’ besteht 
aus vier Kriterien: 

1. Visualisierung 

2. Lokalisierung/Eingabe 

3. Handhabbarkeit 

4. Flexibilität 

Ein im Sinne des Kriteriums 
‘Visualisierung’ günstiges 
Gerät hat scharfe, kontrast- 
reiche Zeichen in typogra- 
phisch günstiger Anordnung 
bei einer flimmer- und stö- 
rungsfreien (ohne Spiegelun- 
gen, Bildinstabilitäten und 
Flimmern) Bilddarstellung. 
Die ‘Lokalisierung und Ein- 
gabe’ zeigt die Güte aller 
Lokalisier- und Eingabeele- 
mente. Bei den untersuchten 
Geräten betrifft sie die 
Tastatur. 

Die ‘Handhabbarkeit' be- 
urteilt die Güte der Bedien- 
elemente wie Netzschalter, 
Höhenverstellung u.ä. 

Als ‘flexibel’ ist ein Gerät zu 
bezeichnen, wenn es bei 
wechselnden Beleuchtungs- 
verhältnissen und Sehentfer- 
nungen für den größten Teil 
der fiktiven Benutzergruppe 
von der statistisch kleinsten 
Frau bis zum statistisch größ- 
ten Mann anpaßbar ist. 

Die Untersuchung hat ge- 
zeigt, daß die Normung einen 
erheblichen Fortschritt be- 
wirkt hat. Neben der flachen 
Tastatur mit hoher Schreib- 
qualität ist auch die Positiv- 
darstellung soweit ausgereift, 
daß man sie heute als Stand 
der Technik bezeichnen 
kann. 

Es ist leider auch möglich, 
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daß neue Geräte auf den 
Markt gebracht werden, die 
sich in der Bildqualität mit ei- 
nem im Jahr 1978 getesteten 
(Standard-) Gerät nicht mes- 
sen lassen. 


Ergonomic und Arbeitsschutz 
Mit Wirkung vom 1. Januar 
1982 sind die ‘Sicherheitsre- 
geln für Bildschirm-Arbeits- 
plätze‘ in das Register des 
Gesetzes für technische Ar- 
beitsmittel (GtA) aufgenom- 
men worden. Sie sind somit 
sowohl für den Hersteller als 
auch für den Einführer von 
Bildschirmgeräten am Ar- 
beitsplatz verbindlich. Die 
Funktion dieses Gesetzes be- 
steht im Schutz des Benut- 
zers von technischen Arbeits- 
mitteln. 

Für die meisten Menschen 
stellt die Büroarbeit eine be- 
sonders sichere Art der Arbeit 
dar. Wie sollen denn in einem 
Büro Unfälle und Gefährdun- 
gen in nennenswerter Zahl 
vorkommen? Doch der Schein 
trügt. Beispielsweise erlitten 
in den Jahren 1972 und 1973 
jährlich mehr als 1.000 
Personen Unfälle durch weg- 
grollende Drehstühle, in deren 
Folge sie mehr als 3 Tage ar- 
beitsunfähig wurden. Die Ver- 
letzungen reichten von Prel- 
lungen bis zu Querschnitts- 
lähmungen (s. KRAFFT, 1981). 
Diese Feststellung führte zu 
konstruktiven Veränderungen 
der Sitzmöbel. Erst dadurch 
wurde diese Gefahr gebannt. 
Zur Zeit läuft eine groß ange- 


‚änderte 


legte Aktion-an, um an den 
Bürostühlen eine zwar selten 
auftretende, aber u.U. töd- 
liche Unfallquelle zu beseiti- 
gen. In ca. 2,4 Millionen Büro- 
stühlen sind Gasdruckfedern 
eingebaut, die in einigen Fäl- 
len schwere Verletzungen, 
auch in Todesfolge, ver- 
ursacht haben. 

Es existiert eine relativ große 
Zahl von Sicherheitsvorkeh- 
rungen, die den Menschen bei 
der Büroarbeit schützen. Daß 
sie den meisten Mitarbeitern 
kaum bekannt sind, ist ein 
Zeugnis dafür, daß die Maß- 
nahmen gelungen sind. Eine 
Sicherheit, die eine ständige 
Aufmerksamkeit bzw. Ver- 
haltensänderung der Mitar- 
beiter erfordert, wird eher lä- 
stig denn nützlich empfun- 
den. 

Auf dem Gebiet des Bildschirm- 
einsatzes war man auf dem 
besten Wege dazu, Vorkeh- 
rungen zu treffen, die Ar- 
beitsumwelt in den Büros vor- 
dergründig, speziell für die- 
sen Fall vorteilhaft zu 
verändern. In Wirklichkeit 
waren diese Veränderungen 
für die Mitarbeiter mehr als 
lästig geworden. Für den An- 
wender bedeuten sie hohe 
Kosten. Man rechne nur zu- 
sammen, was Spezialarbeits- 
plätze für jedes Terminalmo- 
dell, eine neue Beleuchtung 
und Klimatisierung, völlig ver- 
Gestaltung der 
Raumflächen u.ä. Kosten. 
Man könnte dem Anwender 
empfehlen bzw. vorschreiben, 
die oben genannten Maß- 
nahmen durchzuführen, wenn 
man davon überzeugt wäre, 
daß ein nennenswerter Nut- 
zen für den Benutzer entsteht. 
Da dieser Fall nicht immer 
eintrat, ist der Eindruck ent- 
standen, daß Ergonomie ein 
teurer Luxus sei, der zudem 
keine Zufriedenheit bei den 
Mitarbeitern bewirkt. 


Vordergründe und 
systemgerechte Ergonomie 
Man kann die Möglichkeiten 
der Arbeits- und Arbeitsplatz- 
gestaltung aus zwei unter- 
schiedlichen Gesichtspunk- 

ten betrachten: 
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1. Man nimmt die derzeitigen 
Eigenschaften der Geräte, Ar- 
beitstische u.ä. als gegeben 
an und versucht, die beste Ar- 
beitsplatzkonstellation unter 
diesen Randbedingungen zu 
realisieren. 

2. Man betrachtet das Ge- 
samtsystem und berück- 
sichtigt dabei den Benutzer 
als wichtigste Randbedin- 
gung. 

Die Position 1 ist die eines 
Anwenders bzw. Organisa- 
tors. Eine zufriedenstellende 
Gestaltung kann ihm nur 
dann gelingen, wenn die Ei- 
genschaften der Arbeitsmit- 
tel, die beschafft werden kön- 
nen, und die Anforderungen 
der Mitarbeiter miteinander 
vereinbar sind. Noch vor we- 
nigen Jahren sahen sich eine 
große Zahl von Organisatoren 
genötigt, eigene Entwicklun- 
gen für Bildschirmtische vor- 
anzutreiben. Denn das Ange- 
bot an Möbeln entsprach 
nicht im entferntesten den 
Anforderungen. Jedoch war 
auch die beste erreichbare 
Konstellation noch unbefrie- 
digend. Fast alle namhaften 
Anwender in der Bundesrepu- 
blik Deutschland haben zwi- 
schen 1975 und 1978, viele 
noch länger experimentiert. 
Diese Bemühungen hatten al- 
lenfalls einen bescheidenen 
Erfolg. 

Ein Grund des Scheiterns die- 
ser Ansätze lag in den Eigen- 
schaften der eingesetzten 
Geräte. In dem erwähnten 
Zeitraum entstanden eine 
Reihe von Empfehlungen, u.a. 
zur Einrichtung von Bildschirm- 
arbeitsplätzen, die wir als 
‘Abhilfe durch vordergrün- 
dige Ergonomie’ bezeichnen 
können. Man beobachtet bei 
dieser Form der Abhilfe ein 
Kriterium — beispielsweise 
die Güte der Beleuchtung — 
stellt einen Mangel fest und 
leitet aus diesem Mangel eine 
Abhilfemöglichkeit ab. So wo- 
Ilte man früher Reflexionen in 
Bildschirmen durch dunkel- 
graue oder schwarze Wände 
vorbeugen. Diese Lösung be- 
achtet jedoch solche Folgen 
nicht, die durch eine lang- 
jährige Tätigkeit in diesen 


entsprechend eingerichteten 
Räumen entstehen können. 
In der Bundesrepublik 
Deutschland hat sich der Nor- 
menausschuß Informations- 
verarbeitung schon wenige 
Jahre nach dem Einsatz des 
ersten Bildschirmgerätes mit 
den entstehenden Problemen 
befaßt. Bereits zu Beginn der 
siebziger Jahre wurden die 
Weichen dafür gestellt, die 
Problemstellung 'system- 
gerecht’ zu untersuchen. Sy- 
stemgerecht heißt, die Rolle 
des Bildschirmgerätes in Ar- 
beitsprozessen erkennen, 
Kurz-, Mittel- und langfristige 
Folgen der Arbeits- und Ar- 
beitsplatzgestaltung erken- 
nen und eine Gesamtlösung 
anstreben, die für den Benut- 
zer und Anwender gleicher- 
maßen befriedigend ist. Wie 
sich eine Abhilfe durch 'sy- 
stemgerechte’ Ergonomie von 
einer vordergründigen unter- 
scheidet, kann man in der 
nachfolgenden Aufstellung 
vergleichen (s. Tabelle 1.1.). 
Diese Aufstellung macht 
deutlich, daß die meisten Pro- 
bleme, die in der Praxis auf- 
tauchen, ohne die Mitwirkung 
des Herstellers nicht befriedi- 
gend gelöst werden können. 
Sie zeigt auch gleichzeitig, 
daß man wie beim Beispiel 
des Bürostuhls — Verbesse- 
rungen für den Benutzer er- 
zielen kann, ohne ihn mit 
Vorschriften und Auflagen zu 
belasten. 


Anforderungen der 
Arwender und Benutzer. 
In den letzten zwei Jahr- 
zehnten hat die empirische 
Sozialforschung immer wie- 
der ein recht problematisches 
Verhältnis zwischen den Be- 
nutzern von DV-Einrichtun- 
gen und ihren Arbeitsmitteln 
zutage gefördert. Man konn- 
te jedoch gleichzeitig fest- 
stellen, daß nicht alle Benut- 
zergruppen sich gleicher- 
maßen verhalten haben. Ein 
großer Teil der Benutzer, bei- 
spielsweise Programmierer, 
Wissenschaftler, DV-Fachleu- 
te, hat ein positives Verhält- 
nis zu ihren Arbeitsmitteln 
und zu anderen Fortentwick- 


lung gezeigt, während andere, 
z.B. Datenerfassungskräfte 
und Sachbearbeiter, eine eher 
kritische Haltung einneh- 
men. 

Man kann diese Benutzer- 
gruppen eindeutig in zwei 
Kategorien einteilen. Un- 
tersuchungen der TU Berlin, 
des ERGONOMIC Instituts 
und schwedischer Streßfor- 
scher haben übereinstim- 
mend folgendes ergeben: 

1. Eine positive Haltung ist 
bei solchen Benutzern von 
Bildschirmgeräten und ande- 
ren DV-Einrichtungen fest- 
stellbar, die ihre Geräte als 
Hilfsmittel betrachten. 

2. Eine negative Haltung nah- 
men solche Gruppen ein, de- 
ren Tätigkeit durch die Benut- 
zung der Geräte ganz oder 
teilweise festgelegt ist, ohne 
daß sie daran etwas ändern 
können. 

Genausowenig, wie sie der 
Arbeitssituation gegenüber 
Verständnis aufbringen, sind 
Anwender wie Benutzer be- 
reit, zu akzeptieren, daß sie in 
grau gestrichenen Räumen 
mit Dunkelkammerbedingun- 
gen an motorisierten Tischen 
arbeiten sollen. Diese Dinge 
sind nicht nur kostenintensiv, 
sie stellen auch eine weitere 
Einengung der persönlichen 
Freiheiten dar. 

Die Entwicklung von neuen 
Spezialarbeitsplätzen nach 
dem Muster des Schreibma- 
schinentisches dient weder 
dem Anwender noch dem Be- 
nutzer. Bildschirmmöbel und 
Bildschirmgeräte müssen 
sich nicht den Anforderungen 
einer falsch verstandenen Er- 
gonomie anpassen, sondern 
an die Aufgabenstellung der 
Benutzer und an die Büroum- 
welt, in der sie stehen. 

Die Aufgaben der Benutzer 
und der Organisatoren sind 
nicht statisch und gleichblei- 
bend, sie ändern sich viel- 
mehr relativ schnell. Ebenso 
verändern sich die Eigen- 
schaften der Bildschirm- 
geräte, die angeschafft wer- 
den. Wenn man bedenkt, daß 
das mittlere Alter von Schreib- 
tischen in deutschen Ver- 
waltungen 14 Jahre beträgt, 


wird die Unsinnigkeit der 
Spezialarbeitsplätze deut- 
lich, die bereits nach wenigen 
Jahren veraltet sind. 

Wir haben die Frage un- 
tersucht, ob die  Bild- 
schirmtechnologie an die 
heutige Bürowelt angepaßt 
werden kann. Diese Frage- 
stellung ist anspruchsvoller, 
als sie zunächst scheint. 
Denn eine Anpassung an die 
heutige Bürowelt heißt nicht 
nur die Hardware eines Bild- 
schirmgerätes ändern, son- 
dern auch die Software, daein 
Bildschirmgerät kein singu- 
läres Gerät ist wie eine Schreib- 
maschine. Es ist vielmehr ein 
Kommunikationsmittel, eine 
Schnittstelle zum Rechner. 
Man muß sich, bevor man 
große Bemühungen unter- 
nimmt, Klarheit darüber ver- 
schaffen, ob eine große Zahl 
von Menschen überhaupt be- 
reit ist, ein technisches Kom- 
munikationsmedium zu ak- 
zeptieren. Die zweite wich- 
tige Frage ist, ob eine Technik 
sich den Anforderungen der 


Menschen und Organisatio- 
nen anpassen läßt, ohne ei- 
nige seiner technischen Qua- 
litäten einzubüßen. Für beide 
Fragen läßt sich eine Antwort 
finden, wenn man das inter- 
nationale Fernsprechnetz mit 
über 500 Millionen Sprecr- 
stellen betrachtet. Es ist das 
größte maschinelle Kommu- 
nikationssystem, das je er- 
stellt wurde. Selbst Men- 
schen, die eine distanzierte 
bis feindliche Haltung zur 
Technik und zu Maschinen zu 


haben glauben, benutzen 
dieses Netz sehr gerne. 
Maschinele ” Kommu- 


nikationssysteme werden zu 
Selbstverständlichkeiten, 
wenn sie den Anforderungen 
ihrer Benutzer entsprechen. 
Für das Bildschirmgerät be- 
deutet dies (s. BUHMANN 
1982) 

‘Ein selbstverständliches Ar- 
beitsmittel neben anderen an 
einem einwandfreien Büro- 
arbeitsplatz’ 

Die ‘Sicherheitsregeln für 
Bildschirmarbeitsplätze’ ha- 
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ben dieser Devise ent- 
sprechend die vornehmliche 
Aufgabe, auf Dauer sich sel- 
ber überflüssig zu machen. 

Die Anforderungen an die Er- 
gonomie der Benutzerober- 
fläche gehen weiter als die 
Sicherheitsregeln, die nur ei- 


Goldmedaillen für die USA - 
das gilt nicht nur für die ver- 
gangenen Olympischen Spiele, 
sondern auch für gute Soft- 
ware, die immer noch zuerst 
aus Übersee kommt. Goldme- 
daillengewinner ist auch das 
Textverarbeitungsprogramm 

HOMEWORD von Sierra Online 
für Commodore 64 und Apple 
Il, nach einem Vergleich des 
Software Buyer’s Guide der 
“Word Processors for the 
Home”. 


HOMEWORD ist der Bestsel- 
ler der Textverarbeitungspro- 
gramme für den Commodore 
64 in den USA und heimst vor 
allem hohes Lob für seine Be- 
nutzerfreunglichkeit, die ein- 
fache und übersichtliche Be- 
dienung des Programmes: 
“HOMEWORD is easier to 
use than a game” so 
“Creative Computing”. 

HOMEWORD arbeitet ganz 
modern mit Bildschirmsym- 
bolen bei den einzelnen Me- 
nüs und führt so auch den An- 
fänger einfach und sicher 
durchs Programm. Eines der 
größten Komplimente lautet 
denn auch: HOMEWORD ver- 
bannt die Furcht vor dem 
Computer (Creative Compu- 


ting). 
So auch “Classroom Com- 
puter Learning”: “HOME- 


WORD bedeutet einen inno- 
vativen Durchbruch von Text- 
verarbeitung in der Schule 
und zu Hause. Es ist von au- 
Berordentlichem Wert für alle, 
die ein anspruchsvolles aber 
leicht zu erlernendes Pro- 
gramm wollen.” 
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nen gewissen Mindest-Stan- 
dard darstellen dürfen. Es ist 
dabei jedoch zu bemerken, 
daß die Normungsarbeit in 
Deutschland einen erheb- 
lichen Fortschritt bewirkt 
hat. 


Völzke Computer 
Peripherie 


Eprom-Programmer V128 für C 20, C 64 u. SX-64 für 
I Eproms 2508/16/32 u. 2758/16/32/64/128. Professionelle 
Ausführung m. komfortabler Treiber-Software auf Kas- 
sette: DM 249,— 
Neu: Eprom-Programmer V128-G 
im Pult-Gehäuse DM 349,— 
Uniment-C 64-Befehlserweiterung: über 50 zus. Befehle 
u. Funktionen für Assembler, Centronics-Druckanschl., 
Graphik-, Sprite-, Sound- und Disketten-Anwendung; mit 
Beispielprogrammen u. ausführlicher Bedienungsanlei- 
tung DM 9,— 
Diskette zzgl. DM 7— 
UNIMENT-Steckmodul DM 199,— 
Weiteres aus unserem Programm: 

— Eprom-Karten und -Löschgerät 

Info — 80-Zeichenkarten ; 


gegen Hagen Völzke, Ahornallee 4, 8023 Pullach 
Rückporto Versandhandel Tel. 089/7 934534 


Fortsetzung von Seite 1 
wesentlichen auf der Diskretisierung von 
Bewegungsabläufen beruhen. Vektor- 
Addition, Molekularbewegungen, schie- 
fer Wurf usw. werden von den Autoren 
nicht nur durch Bereitstellung des 
mathematischen Apparates, sondern 
durch anschauliches Vertrautmachen 
mit den jeweiligen physikalischen 
Grundlagen vermittelt. Als Beispiel wol- 
len wir die Behandlung von Satelliten- 
bahnen betrachten, wozu Theodor Duen- 
bostl und Theresa Oudin u.a. schreiben: 
"Der Flugkörper erhält eine Anfangs- 
geschwindigkeit v(o) und befindet sich 
im Einflußbereich der Erde. Daher wirkt 
auf ihn eine Kraft, die ihn in Richtung zum 
Erdmittelpunkt beschleunigt. Seine Ge- 
schwindigkeit wird also in jedem be- 
trachteten Zeitintervall geändert, es 
hängt aber auch die Beschleunigung von 
seiner Flughöhe ab. Für jedes Zeitinter- 
vall werden berechnet: 

1. die Beschleunigung, abhängig von der 
jeweiligen Höhe, 

2. die daraus folgende neue Geschwin- 
digkeit, 

3. der neue Abstand zur Erde, bzw. die 
neue Position des Flugkörpers. 

Da die Bewegungsrichtung nicht mit der 
Richtung der anziehenden Kraft überein- 
stimmt, müssen von allen drei Größen 
(Beschleunigung, Geschwindigkeit, Ort) 
für die graphische Darstellung zwei Kom- 
ponenten angegeben werden (X-Kompo- 
nente, Y-Komponente).” 

Nun wird ebenso leicht nachvollziehbar 
die nach dem Gravitationsgesetz geltende 
Anziehungskraft F zwischen den Körpern 
mi (Erde) und m2 (Flugkörper) herge- 
leitet, sodaß unser Buch nahezu auch die 
Funktionen eines Lehrwerkes erfüllt. 
Neben den genannten Erscheinungen 
werden auch Fragen aus dem Bereich der 
Elektrizitätslehre (z.B. Amplitudenmodu- 
lation), Optik (Lichtbrechung an Konvex- 
/Konkav-Linsen), der speziellen Relati- 
vitätstheorie (Lorentztransformation) 
sowie praktische Beispiele aus dem 
Alltag behandelt. Würde es Sie nicht in- 
teressieren, ob Sie beim Sprung vom 10- 
Meterbrett in ein 1,8 m tiefes Bassin 
Kopfschmerzen bekommen oder nicht? 
Ein spezielles Programm stellt die jewei- 
ligen Eintauchtiefen sogar vierfarbig in 
einer Graphik dar. 

Alle Programme sind für den Sharp PC 
1500 mit Druckerinterface CE 150 so- 
wie RAM-Pack CE 155 geschrieben, lau- 
fen bei leichter Veränderung aber auch 
auf den gängigsten Homecomputern. Die 
Daten: B.G. Teubner (Stuttgart) 1983, 
150 Seiten, 23,80 DM, ISBN 3-519-02 
517-5. 


Tölke/Tölke 
Textverarbeitung 


mit Programmen für TI-99/4A und VC-20 


Wer schon ein fertiges Textverarbeitungs- 
programm für seinen Heimcomputer be- 
Sitzt oder erwerben möchte, erfährt schritt- 
weise und leicht verständlich, wie ein- 
fach dies prinzipiell möglich ist. Denn 
Basic als echte Dialog-Programmier- 
sprache verfügt über eine zwar geringe 
Anzahl, dafür aber sehr leistungsstarke, 
hierfür geeignete "Zusatzbefehle” (Zei- 
chenketten-Operationen). 

Wer ein eigenes Programm entwickeln 
möchte, erhält eine Fülle von Anregun- 
gen. Sie berücksichtigen verschieden- 
artige Gesichtspunkte und zwar in Form 
von kurzen Demonstrationsbeispielen, die 
sich gut analysieren lassen. 

Da jeder Basic-Computer einen anderen 
"Dialekt” spricht, entstehen unter den 
vielen Heimcomputern gewisse Verstän- 
digungsschwierigkeiten — bezogen auch 


auf herkömmliche Anweisungen. Es war 
deshalb notwendig, sich auf zwei ver- 
breitete Geräte zu beschränken. Diese 
Modelle sind der TI-99/4A (Texas Instru- 
ments) und der VC-20 (Commodore). Nur 
geringe Verständigungsschwierigkeiten 
wird es bei den Geschwistermodellen 
TI-99/A, CC-40 und Commodore 64 
geben. 

Wer die Mühe der eigenen Programmie- 
rung scheut, findet im Anhang ein ferti- 
ges und recht leitungsfähiges Programm, 
das nur noch in die schon erwähnten 
Computer einzugeben ist. 

Das Buch geht davon aus, daß dem Leser 
nur eine einfache technische Ausrüstung 
zur Verfügung steht (Kassettenlaufwerk 
und Drucker). 

Die Daten: Vieweg, 1. Aufl. 1984, 148 S. 
DM 36,-, ISBN 3-528-04276-1 
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Assemblerkurs 65XX 
Teil 2 


Zuerst zu den Lösungen der | Als Hilfe zum Umrechnen 


Aufgaben des 1. Teils 
unseres Kurses. 
Zu 1) 356,,und 2AF,, in Dezi- 


mal umgewandelt werden. 


5.8, 
= 5 
se = Bio 
300, = 768, 
854,5 

2AF, 
| Ir, = 15, 
AO, = 160, 
200, = 512, 
687,0 


Zu 2) 356,, (= 854,,) und 
2AF,, (= 687,,) in Binär, da 
die hexadezimale Zahlendar- 
stellung mit dem binären Zah- 
lensystem verwandt ist (1 
Hex-Zahl gibt 4 Bits), benut- 
zen wir die Hex-Zahlen: 


- 


0011 


5 


6101 


[-) 
6118, 


= 1161016116, 


= 854, 


% 
Mit, 


8% | zero |1si 
= 1010101111, 
= 687,9 

Zu 3) Wie wird 1024,, und 


255,, in hexadezimale Schreib- 
weise ausgedrückt: 


1024, = 400, 


Zu 4) Umwandlung der Zahlen 
von 3 in Binärcode: 


Fi 
B166 


u 
v000 


& ik 
6000, 


= 10006600000 , 
= > 
= 1024 


F 


E 
1111 [1111, 


= 11111111, 


nes 
zug ıo 
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können wir folgende Tabelle 
benutzen: 


rIEXADEZIMAL- SPALTEN 


-o© 


1.048.576 
2.097.152 
3.145.728 
4.194.304 
5.242.880 
6.291.456 
7.340.032 
8.388.608 
9.437.184 
10.485.760 
11.534.336 
12.582.912 
13.631.488 
14.680.064 
15.728.640 


mono>vwon2unr 0 
nnmono>vowaun»2wn 


983.040 


Zur Anwendung der Tabelle 
Wie schreibt man zum Bei- 
spiel: 3C,, in Dezimal. Wir ge- 
hen von der kleinsten Zahl 
aus C,,. In der Tabelle ganz 
rechts können wir unter ”C” 
nachsehen und erkennen die 
Zahl 12. Die merken wir uns 
und können zur nächsten Zif- 
fer; die 3. Diesmal benutzen 
wir die 2. Spalte der Tabelle. 
Dort können wir gegenüber 
der ”3” die 48 ablesen. Nun 
müssen wir noch die 12 und 
die 48 addieren: ergibt 60. 
Einfach was... 

Bevor wir nun mit den einzel- 
schiedliche Aufgaben erfül- 
len: 

1) zur Datenübertragung — 
der Datenbus 

2) zur Adressierung der ein- 
zelnen Bauteile - der 
Adressbus 

3) der Steuerbus, über den die 
CPU die anderen Einheiten 
steuert. 


Das Herzstück des Com- 
puters ist die CPU, die Zentral- 


nn mons>vownu>2wun «oo 
nmono>voxwuaouw2uneo© 


einheit. Zur Erfüllung ihrer 
Aufgaben verfügt sie über un- 
terschiedliche Funktionsein- 
heiten (Register), die zur 
Adressierung, zur Steuerung 
und zur Rechnerei nötig sind. 
Der 65XX Prozessor besitzt 
folgende Register: 

PC - Befehlszähler (Program 
Counter) 

S - Stapelzeiger 
Pointer) 

A- Rechenregister (Akkumu- 
lator) 

X,Y - Indexregister zur Tabel- 
lenverwaltung bzw. indi- 
zierten Adressierung 

P - Statusregister, welches 
die Ergebnisse der einzelnen 
Operationen anzeigt. 

Die Verwendung dieser Regi- 
ster werden wir in den folgen- 
den "Compute mit"-Ausgaben 
anhand von Beispielen ken- 
nenlernen. 

nen Befehlen des 65XX- 
Microprozessors beginnen, 
noch eine Beschreibung des 


(Stack 
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Innenleben eines Microcom- 
puters. 

Dieser besteht aus vier 
Bauteilen und -Gruppen, die 
jede eine spezielle Funktion 
haben. 

1. CPU (Central Processing 
Unit/Zentraleinheit): 
zB. 6502 oder 
Microprozessor 

2. ROM (Read Only Memory): 
Aus diesem Festwertspeicher 
bezieht die CPU Ihre Anwei- 
sungen, nach denen sie ar- 
beiten soll, also Programme. 
Je nach Aufgabengebiet des 
Computers ist dieser ROM 
sehr groß (z.B. wenn das ge- 
samte Betriebssystem inte- 
griert ist), oder klein (z.B. 
wenn es nur einen Urlader- 
bzw. Autolader zum Einladen 
des Betriebssystems ent- 
hält). 

Der Commodore 64 hat z.B. in 
seinem ROM, der 20KByte 
groß ist, Betriebssystem und 
den Basic-Interpreter fest 
installiert. 

3. RAM (Random Access Me- 
mory), Speicher mit freiem 
Zugriff (Read and Write). In 
ihm werden Daten eines Pro- 
grammes abgelegt, bzw. Pro- 
gramme die von Diskette oder 
Kassette geladen werden 
können. 

Auch seine Größe hängt von 
dem Aufgabengebiet des 
Computers ab, z.B. benötigt 
ein Microcomputer zur Steue- 
rung eines simplen techni- 
schen Vorganges sehr wenig 
RAM-Speicher für die Daten 
des Prozesses, jedoch für die 
flexible Anwendung eines 
Computers in der z.B. Text- 
verarbeitung, Finanzbuch- 
haltung, in Architekturbüros 
oder zuhause braucht dieser 
einen großen RAM-Speicher 
für die vielfältigen Aufgaben. 
4. Die Verbindung zur Außen- 
welt (Tastatur, Bildschirm, 
Floppy, Kassette, Drucker) 
wird durch einen Ein/Ausga- 
be-Baustein realisiert. 
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All diese Bestandteile sind im 
Computer miteinander ver- 
bunden. Diese Verbindung 
nennt man Busse. Von diesem 
gibt es mehrere, die unter- 


Am 5. Oktober 1984 
Ill. Fernseh-Programm 


19.15 -20.00 Uhr 


Mit Heimcomputern kann 
man nicht nur Videospiele 
spielen. Wir stellen Leute vor, 
die mehr aus ihrem Hobby 
machen. Zum Beispiel einen 
Schüler, der selbst Video- 
spiele entwirft, programmiert 
und verkauft. Jemanden, der 
ein systematisches Lottopro- 
gramm entworfen hat und da- 
mit vermutlich mehr Geld ver- 
dient als im Lottospiel. Einen 
Studenten, der ein eigenes 


Unser Softwareversand bietet 
Ihnen zu wirklich einmalig 
günstigen Preisen jeden Mo- 
nat die neuesten Programme, 
auf Kassette an. 

Wenn Sie die hier aufge- 
führten Bedingungen beach- 
ten, können auch Sie von un- 
serem Angebot Gebrauch 
machen. 


Bestellungen Inland: 

Gegen Einsendung eines 
Schecks oder Vorauszahlung 
auf unser Konto bei der 
Kreissparkasse Eschwege, 
Bankleitzahl 522 500 30 
Kto.-Nr. 45 22 934 

senden wir Ihnen die ge- 
wünschten Programme 
schnellstmöglich zu. Geben 
Sie bitte unbedingt die ge- 
naue Bezeichnung der Kas- 
sette (z.B. Compute mit 37/ 
84 C-64) und den Computer 
an. 


Bestellungen Ausland: 

Nur Vorauskasse, Schein 
Keine Schecks oder Über- 
weisungen! 


Vokabel-Lern-Programm zur 
Nachhilfe einsetzt. Wieder ein 
anderer hat seine Heizanlage 
mittels Heimcomputer opti- 
miert. Schließlich wird ein 
Mathematikstudent vorge- 
stellt, der sich über seinen 
Heimcomputer geärgert hat 
und nun bessere Rechner 
selbst fabriziert: Heimcom- 
puter made in Germany. 


Vorgestellt wird auch ein 
Musiker, der mit Hilfe eines 


aus Gompute mit37/84 
Commodore 64 K14,- DM 
Terror Tower 

Sprite Generator 

Hyperbirn 

Synthesizer 

Knobelei 


VC-20 

Hop Catch 
VC-Gunner 
Überweisungsprogramm 


K12,- DM 


aus Compute mit 38/84 
Commodore 64 K14,-DM 
Squiz 

Robby’s House 

Race men 64 

CB TEN Code 

Fontain Pen 


V6-20 
H-Grafik-E 

Hot Stones 
Space Monster 
Destrobolt 
Amazonas 
Goldfinger 


K14,-DM 


HEIMGOMPUTER 
„.„Mehr als Videospielereien 


selbstgebastelten Pro- 
gramms aus seinem Heimcom- 
puter ein vollwertiges Komposi- 
tions- und Musikinstrument 
macht. Dann ein Diabetiker, 
der mit Hilfe eines Computer- 
programmes Kalorienzahlen, 
Insulinspiegel, und bedroh- 
liche Situationen der Zucker- 
krankheit besser kontrollieren 
kann - er erhielt für die Ent- 
wicklung dieses Programmes 
den Sonderpreis “Jugend 
forscht”. Schließlich ein 


Musiklehrer, der aus einem 
Kleinstcomputer ein an- 
spruchsvolles Musiklehr- und 
Gehörschulungsprogramm her- 
ausholt. 


Außerdem zeigt die Sendung, 
wie der Entwurf zu einem 
Heimcomputer entsteht, wie 
er produziert wird, wie er auf- 
gebaut ist und funktioniert 
und wie man ein Basic- 
Programm für sinnvolle An- 
wendungen schreibt. 


NEU FÜR DEN 
COMMODORE 


Die preiswerte 
Einsteiger-Software. 


SM SOFTWARE AG / MÜNCHEN 


Compute mik 
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Logik im Basic-Programm 


Wie man Systematik in sein Selbstgestricktes bringt 


Sie erinnern sich: vor einer Woche sprachen wir ab, auf unserer Reise durch die Programmiersprache 
Basic systematisch vorzugehen. Diese Bedingung setzt eine kurze Behandlung der wesentlichen 
Sprachelemente voraus, soweit diese entweder nicht bekannt oder aber vergessen sind. Dabei wollen 
wir uns auf das Wichtigste beschränken, da ein gründlicher Einführungskurs ohnehin parallel läuft. 
Schauen wir uns also die Basic-Sprache einmal an. 


LET und SCHLEIFE 
Sie kennen sicher die be- 
kannte Geschichte von dem 
orientalischen Kaufmann, der 
von seinem königlichen Kun- 
den nicht mit Geld, sondern 
Reiskörnern bezahlt werden 
wollte. Bescheidener Lie- 
ferant, dachte der König. 
Selbst bei einer ganzen Reihe 


10 FOR I= 1T064 


20 LETR= R*2 


30 NEXT I 


Tippen Sie den Dreizeiler mal 
in Ihren Commodore ein. 
Starten Sie mit RUN. 

Was tut sich? 


40 PRINT R 


Wieder RUN und auf das Er- 
gebnis gewartet... 

Nun, was finden wir? Eine 
jämmerliche Null! Das ist al- 
lerdings zu wenig. Aber wir 
haben doch alles beachtet? 
Kein Syntax-Fehler (den 
hätte der Rechner ange- 
zeigt), die Schleife korrekt 
und vollständig eingeleitet 
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von Säcken kommt mein 
Schatzmeister da günstig 
weg. Hatte er sich gedacht! 
Der Kaufmann war ganz und 
gar nicht anspruchslos, was 
unser erstes kleines Pro- 
gramm zeigen wird. 

Wir brauchen dazu im wesent- 
lichen zwei Dinge: eine 
Variablen-Zuweisung mit LET 


sowie eine sogenannte Schlei- 
fe, gebildet mit FOR...TO und 
NEXT. Weshalb? 


Unser cleverer Geschäfts- 
mann verlangte nämlich von 
seinen königlichen Kunden so 
viele Reiskörner, wie auf ein 
normales Schachbrett mit 64 
Feldern passen - und zwar auf 


jedes Feld die doppelte Zahl 


- als auf dem vorigen. Somit ka- 


men auf das erste Feld 1, auf's 
zweite 2, aufs dritte 4 
Reiskörner. Und auf das 64. 
Feld? - Das soll unser kleines 
Programm in Erfahrung 
bringen: 


Sie wissen, daß Basic in Zeilen geschrieben wird, die normalerweise in Zehnerschritten gewählt 
werden, damit später noch etwas eingefügt werden kann. Wir fangen also mit Zeile Nr. 10 an und 


eröffnen unsere Schleife. 


Da wir es mit 64 Feldern zu tun haben, muß auch die Zählschleife 64 mal durchlaufen werden. 
Dazu.wird bei jedem Durchlauf die Variable | um 1 erhöht werden. Sie inkremiert, wie die Fach- 


leute sagen, jeweils um 1. 


Hier haben wir die LET-Zuweisung, die in den meisten Basicversionen zu R= R*2 verkürzt wer- 
den darf. Statt R hätten wir jeden anderen Buchstaben ebenso nehmen können. Ich fand R für 


Reis als naheliegend. 


Damit wir nicht auf dem ersten Feld hocken bleiben, schließe ich die Schleife, indem ich sage “näch- 


stes |”. 


Hatte ich es mit doch gedacht 
- nicht viel! Der Computer 
meint READY, also “fertig”. 
Das ist sicher besser, als 


wenn er sich in den Schmoll- 
winkel zurückgezogen hätte 
(die Fachleute nennen diesen 
Koller “abstürzen”), reichen 


tut es uns aber noch nicht. 


Im Zweifelsfall interessiert uns, was aus der Variable geworden ist, die uns die Reiskörner auf 
dem 64. Feld liefern soll. Deshalb ergänze ich unser Programm um eine Output-Zeile. 


und geschlossen, mittendrin 
die nötige Zuweisung. 


Diese Zuweisung ist— obwohl 
gleich geschrieben- nicht mit 
einer Gleichung im mathe- 
matischen Sinn zu verwech- 
seln. Wir fordern damit ledig- 
lich, daß der Variablen R ab 
sofort der doppelte Wert des- 


sen zugeordnet wird, das zu- 
vor mit ihr gleich gesetzt 
wurde. 

Da wir das aber in der kor- 
rekten Basic-Schreibweise 
getan haben, sollte unser klei- 
nes Reiskörner-Programm 
einwandfrei laufen. 

Aber halt — beim Start eines 
jeden Programmes werden 
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sämtliche Variablen auf Null 
gesetzt. Ja, das muß es sein: 
unser Programm startet 
(R=0), die Zuweisung fordert 
0=0*2 - und das gibt natür- 
lich wieder 0. Was ist da zu 
tun? 


5LETR=1 


IA 


Wir setzen gleich zu Anfang R auf 1. Dann haben wir die Voraussetzung für einen einwandfreien 


Start geschaffen. 


—mm———_lJjsgqü—szmm en 


Und siehe da: es klappt! Der 
Rechner durchläuft die 64 
Schleifen und wirft das Er- 
gebnis aus. Auf dem 64. Feld 
müssen 1.84467441 E+19 
Reiskörner liegen. Wen das 
nun ein wenig irritiert, dem sei 
gesagt, daß Mathematiker 
und Naturwissenschaftler 
sehr erfindungsreich sind, 
wenn es darum geht, sich die 
Arbeit möglichst einfach zu 
gestalten. 

Während z.B. ein gewis- 
senhafter Bankangestellter 
alle Zahlen (auch die mit vie- 
len Nullen) ungekürzt aus- 
Schreiben muß, macht der Ma- 
thematiker kurzen Prozess: 
wie Physiker, Chemiker, Bio- 
logen nutzt auch er die soge- 
nannte wissenschaftliche 
Notation mit Exponentialdar- 
stellung. Das heißt: jede Zahl 
wird einfach in Zehnerpoten- 


10 FOR I= 1 T0 10 


20 IF I= 10 THEN PRINT “OK-ENDE” 


30 Next I 


INPUT, DIM, GOTO 
und GOSUB 


Wie gesagt, unser Basic-Kurs 
läuft parallel: er behandelt 
alle Befehle ausführlich und 
läßt hoffentlich keine Frage 
offen. Hier geht's darum ein 
wenig schneller, weil wir nach 
Behandlung der wichtigsten 
Anweisungen noch anderes 
vorhaben. 

Die drei neuen Befehle ermög- 
lichen uns zum ersten, dem 
Computer einen Wert einzu- 
geben. Mit INPUT (zu 
deutsch: Eingabe) fragt uns 
der Rechner nach einem Wort 
oder einer Zahl, worauf er das 
Erhaltene einer Variablen zu- 
ordnet. Wenn wir ein Wort ein- 
geben, wird es einem 
STRING (zu deutsch: Kette 
bzw. Strang) zugewiesen — 
wenn der Computer eine Zahl 
erhält, verstaut er die in einer 
numerischen Variablen. Da- 


zen geschrieben (100 z.B. als 
10 hoch2, 100 als 10 hoch 3). 
Man schreibt eine 1 und da- 
hinter als Hochzahl die Zahl 
der Nullen, die eigentlich 
noch hingehören. In unserem 
Fall wären es also 19 Nullen. 
Dabei müssen allerdings die 
angegebenen Dezimalstellen 
berücksichtigt werden. Voll 
ausgeschrieben sähe unsere 
Zahl dann wie folgt aus: 


18.446.746.744.100.000.000 


Das sind dann 18 Trillionen, 
446 Billiarden, 746 Billionen, 
744 Milliarden und lumpige 
100 Millionen Reiskörner. 
Nehmen wir pro Korn 0,1g als 
Standardgewicht, so sind es 
immerhin noch mehr als 1,8 
Billionen Tonnen Reis. 


Nun, trotz des erstaunlichen 


Ergebnisses ist das Reis- 
körner-Programm, das ich hier 
aufgeschrieben habe, nicht 
besonders nützlich. Es geht 
immer von ein und derselben 
Ausgangsposition aus und ar- 
beitet stets mit den gleichen 
Werten. Nach dem ersten 
Durchlauf kann ich mir also 
einfach den Endwert der 
Variablen R aufschreiben und 
das Listing in den Mülleimer 
werfen. 

Denn Programme haben ja 
nur eine praktische Be- 
deutung, wenn sie immer wie- 
der mit neuen Werten laufen 
und somit neue Ergebnisse 
bringen können. Für einmali- 
gen Gebrauch lohnt sich 
kein Programm. 


PRINT und IF...THEN 


Ein sehr nützliches Kom- 


mando ist der PRINT-Befehl. 
Er bringt Zahlen und Zeichen 
auf den Bildschirm oder zu 
Papier. Auch die Entschei- 
dung IF...THEN gehört zu den 
wichtigsten Anweisungen. 
Mit ihr kann man den weite- 
ren Verlauf eines Program- 
mes von einer Bedingung ab- 
hängig machen: “Wenn” das 
oder jenes so oder so ist, 
“Dann” soll irgend etwas 
geschehen. 

Schauen wir uns die neuen 
Befehle einmal anhand eines 
Zählprogrammes an. Es soll 
bis 10 zählen und dann anzei- 
gen, daß der Befehl ordnungs- 
gemäß ausgeführt wurde. 


Sie kennen das schon: hier wird eine Schleife eröffnet. 


Die Variable | wird abgefragt: wenn sie gleich 10 ist (das ist erst beim 10. Durchlauf der 


Fall), druckt der Computer OK-ENDE aus. Ist | ungleich 10, so passiert nichts; der Rech- 
ner geht zur nächsten Zeile weiter. 


Hier schließen wir wieder. Unser Programm ist fertig. 


mit beide unterschieden wer- 
den können, erhält die String- 
variable ein Dollarzeichen; 
also z.B. X (numerisch) und 
X$ (String). Genau erfahren 
Sie das ohnehin im Basic- 
Grundkurs. 

DIM ist die Abkürzung für Di- 
mensionierung. Schon dieser 
Begriff macht deutlich, was 
DIM tut, nämlich eine be- 
stimmte Dimension festle- 
gen. Mit DIM erzeugen wir ein 
System von Fächern, in de- 
nen wir jeweils eine Zahl oder 
ein Wort ablegen können. Die 
Fächer können ein-dimensio- 
nal zugeordnet sein (also nur 
neben- oder übereinander), 
sie sind aber auch mehrdi- 
mensional definierbar und bil- 
den dann Matrizen. Eine 
solche Matrix läßt sich zwei- 
dimensional in Zeilen und 
Spalten aufteilen, kann aber 
auch eine Tiefenausdehnung 
besitzen und somit dreidi- 


mensional werden. Die Ma- 
thematiker kennen ja ohnehin 
keine Grenzen, selbst wenn 
sich vier- fünf- oder sechsdi- 
mensionale Vektoren (so wer- 
den diese Arten von Variablen 
auch genannt) in der Praxis 
nicht mehr vorstellen lassen. 
GOTO ist ein vergleichsweise 
simpler Befehl: er veranlaßt 
den Rechner, sofort ineine be- 
Stimmte Programmzeile zu 
“springen” und dort mit der 
Abarbeitung fortzufahren (go 
to heißt ja im Deutschen ‘gehe 
nach'...oder ‘gehe zu...) 

GOSUB ist eine Abkürzung 
für “go to subroutine” und 
heißt auf deutsch: “Mach 
Dich ab in's Unterprogramm”. 
Im Gegensatz zu GOTO kehrt 
der Computer aber immer 
wieder an die Stelle zurück, 
von der aus er das betreffende 
Unterprogramm angesteuert 
hatte. D.h., er fährt mit derje- 
nigen Programmzeile fort, die 
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dem Sprungbefehl GOSUB 
unmittelbar folgt. Zur Rück- 
kehrhilfe muß das Unterpro- 
gramm allerdings stets mit ei- 
nem RETURN (deutsch: ‘zu- 
rück’) abgeschlossen wer- 
den. 


Mit diesen Befehlen haben 
wir schon einiges gewonnen 
und können unser erstes 
richtiges Anwenderpro- 
gramm schreiben: Stellen Sie 
sich vor, Sie haben einen 
Computer-Shop und wollen 
unseren Kunden Rechnungen 
schreiben. Modern, wie Sie 
nun einmal sind, lassen Sie 
das natürlich den Rechner 
übernehmen. Wenn Sie ihm 
alles gut aufschreiben, kann 
er so etwas auf Anhieb und 
aus dem Eff-Eff. 
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10 INPUT “ANZ. DER ARTIKEL?”; A 
11 B=A-1:DIM X(B,1) 


15 C$=CHR$(147):PRINT C$ 


20 FOR I= ITOA 

21 B= 1-1 

30 PRINT A;“. ARTIKEL?” 

31 INPUT X(B,0) 

32 PRINT “EINZELPREIS” 

33 INPUT X (B,1);6=6+-X(B,1) 
34 C$=CHR$(147):PRINT C$ 

35 NEXT I 

40 INPUT “KUNDEN-NUMMER”; K:GOSUB100 
50 M=6*.14:B=6+M:S=B*.03 
60 FORI= 1T0A 

61 GOSUB 150 


62 NEXT I 

70 PRINT” ” 

71 PRINT "ENDBETRAG” 

12 PRINT "(INKL 14% MWST)”;B;”’DM” 
73 PRINT” ” 

75 PRINT "BEI ZAHLUNG INNERHALB VON” 
16 PRINT "8 TAGEN NACH ERHALT DER” 
77 PRINT "RECHNUNG GILT FUER SIE” 
78 B= B-S:PRINT "DER SONDERPREIS VON” 
79 PRINT "NUR”;B;” DM (SKONTO 3%)” 
80 PRINT ” " 

81 PRINT "UEBERWEISUNGEN ZUGUNSTEN” 
82 PRINT "UNSERES POSTGIROKONTOS” 
83 PRINT "NR 4289 31-104 BEIM” 

84 PRINT "POSTGIROAMT BERLIN-WEST” 
85 PRINT "(BLZ 100 100 10)” 

90 END 

100 IF K=1 THEN GOSUB 200 

101 IF K=2 THEN GOSUB 210 

102 IF K=3 THEN G0SUB 220 

105 RETURN 

150 J=H1 

151 IF X (4,0)=1 THEN N$= "VC-20” 
152 IF X (J,0)=2 THEN N$= ”C-64” 

153 IF X (J,0)=3 THEN N$= ”FLOPPY” 
155 PRINT N$,X(J,1) 

160 RETURN 

200 PRINT "RECHNUNG FUER” 

201 PRINT "HERRN” 

202 PRINT "FRITZ MOEGLICH” 

203 PPINT "’ANNENWEG 2” 
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Zunächst lassen wir den Computer nach der Zahl der in Rech- 
nung gestellten Artikel fragen: sie bestimmt nämlich die Größe 
der Matrix X, die Warenbezeichnung und Preis aufnehmen wird. 
Da auch X(0,0) ein Fach ist, darf die Matrix um eins kleiner di- 
mensioniert werden, als A beträgt. Deshalb benutzen wir B 
zum Dimensionieren. 

Bei Commodore-Rechnern erzeugt CHR$(147) die CLS/HOME- 
Funktion, löscht also den Bildschirm und bringt den Cursor in 
Ausgangsstellung. Wir werden, um die Bildschirmanzeige ein 
bißchen deutlicher zu machen, diese Möglichkeit öfters 
einsetzen. 

Nun geben wir die Artikel der Reihe nach ein, eine Schleife zählt 
dabei bis A (also bis zum letzten Artikel). Unsere Matrix X gleicht 
zwei Schubladenreihen (die erste von 0,0 bis B,0 und die zweite 
von 0,1 bis B,1), wobei in die eine die Warenbezeichnungen als 
Code eingetragen werden, und in die zweite die Einzelpreise 
kommen. 

Dann wird der Monitor gelöscht und der nächste Artikel 
angefordert. 

Nun wird die Kundennummer erfragt und der entsprechende 
Kunde aus einem Unterprogramm hervorgeholt, das in Zeile 100 
beginnt. 

In Zeile 50 wird die Mehrwertsteuer errechnet (M), indem 14% 
von G genommen werden. 6 ist die Variable, die in Zeile 33 sämt- 
liche Einzelpreise aufnahm, jetzt also den Gesamt-Warenwert 
repräsentiert. B soll dann der Ges.-Warenwert plus Mehrwert- 
Steuer sein. S ist der Skontobetrag (3%), um den sich B bei Bar- 
zahlung reduziert. Sie sehen, wie viel eine kurze Zeile wie die Nr. 
50 leisten kann. 

Mit Zeile 60 startet eine neue Schleife, die den Ausdruck der 
Artikel in Szene setzt. Da mit unserem Warencode der Kunde 
nicht viel anfangen könnte, wird der Code per Unterprogramm in 
Klartext umgesetzt (ab Zeile 150) 

Zeile 70 druckt eine Leerzeile, dann folgt die Angabe des Rech- 
nungsbetrages, also B. Damit den Barzahlern mehr Anreiz zum 
sofortigen Überweisen des Betrages gegeben wird, machen wir 
zusätzlich auf die 3% Skonto aufmerksam. Wir ziehen S von B 
ab und drucken den ermäßigten Betrag aus. 


Damit unser Kunde auch weiß, wohin er den Rechnungsbetrag 
zu überweisen hat, geben wir unsere Kontoverbindung an. 


In Zeile 90 ist unser Programm le e 
Ausdruck Warenbezeichnung (Klartext) und Einzelpreis 


Ab Zeile 200 ist unsere kleine Kunden-Datei zu finden. Sie wird 
vom Adress-Unterprogramm (Z.100-105) benutzt. 
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204 PRINT 9191 DINDSDA 1” 


205 RETURN 


210 PRINT "RECHNUNG FUER” 


211 PRINT "FRL” 


212 PRINT "SUSANNE ABERNICHT” 


213 PRINT "POSTFACH” 


214 PRINT "9100 GROSSTADT 50" 


215 RETURN 


220 PRINT "RECHNUNG FUER” 


221 PRINT FRAU” 


222 PRINT "BRIGITTE GEWOLLT” 
223 PRINT "MARKTSTRASSE 17” 


224 PRINT "9567 DADORF” 
225 RETURN 


Versuchen Sie bitte nun - 
quasi als Hausaufgabe - eine 
Kürzung des vorliegenden 
Programmes. Ihre Neufas- 
sung soll mindestens genau 
so komfortabel und leistungs- 
fähig wie diejenige sein, die 
ich Ihnen heute vorgelegt 


habe. Sie soll aber kürzer wer- 
den. Beim nächsten Mal wer- 
den wir dann gemeinsam eine 
Überarbeitung versuchen und 
darüber hinaus noch weitere 
Befehle kennen lernen. 

(sk) 
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BIETE AN SOFTWARE 


6-64 120 Top-Programme für 45,- DM 
zu verkaufen. 
@06479/6%7 nach 17 Uhr 


WERT rer 
64er-Progr. zu Superpreisen!!l 
Info gratis! 
F. Zillich, 
Zoppoterstr. 27a, 4000 Düsseldorf 13 
WArHrEE  r  r 


Commodore 64 - Günstige Gele- 
genheit: Wegen Systemwechsel 250 
Topprogramme auf Disk oder Cassette 
für nur DM 200,- Schein/Scheck 
oder NN. auch möglich 70 Prg. für 
nur DM 50,-. Bestellungen an: 

P. Weber, Alter Teichweg 137 F, 
2000 Hamburg 70 


VC-20 Software billig, billig 
Action, Organisation, Spiele 
Ausführl. Liste gegen 80 Pf. Porto 
anfordern bei: TH Schläger, 
Elsastraße 28, 2000 Hamburg 76 


CBM 64 Brandneu aus Amerika 
Summergames, Stiippuker, Dallas, 
Adventure, Doodle, Slot Light, Curs- 
Aerobicdancing + weitere 300 Games 
auf Disk und Cass. Liste a 3,- DM an 

Holland CMB Club, Postbus 390, 

6900 AA Zevenaar Holland 
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6-64-Superprogramme abzugeben oder 
zu tauschen. Gratisliste bei 
Postlagernd 0585428, 7900 Ulm/Do. 


Spiele für C-64 auf Kassette, z.B. 
Armadeddon, Hobbit und vieles mehr 
bei Schreibwaren-Gründl, Franzis- 
kanerstraße 14, 8000 München 80, 
Direkt oder Versand. Liste gegen -,80 Pf.! 


BIETE AN HARDWARE 


VC-20 +8K+16K+24K+32K+36 Progr 
zu verk. VB 390,- DM, K. Scherkenbach, 
= 02267/4870 


Verkaufe 6-64 + Datas. + Gar. + Prog 
für DM 740,- 
Bei Int. An: Monika Wohlfell, 
Danziger Weg 5, 5434 Dernbach 


Verkaufe: VC-20+ Datasette+16K+8K+ 
3 Bücher+ 2 Module + Spiele für 700 DM 
v. Bucheinzelverkauf ®069/372872 


WAR rer rer re 
Soft- und Hardware für VC-20 + 64 
Akustik-Koppler, Schnittstelle, 
Doppellauf-Floppy Speichererw 
40/80 Zeichenkarte und Bustreib 
für 1541, macht Ihre Floppy 8 x 
schneller beim Einlesen. Katalog 
anfordern bei 
Norbert Flesch, Lippspringerstr 14 
4650 Gelsenkirchen 
20209/395447 
La 2222 2 2 2 2 er 


Verk. 6-64 + Rec. + Zubehör mit 11 Mo 
Garantie für 700,- DM ®09562/8843 


© Spectrum ® Spectrum ® Spectrum ® 
Erw. a. 48K 89,- DM, 80K 189,- DM prog. 
Joyst. Intf. 110,- DM, Joyst.Interf. 53,- 
DM dK’Keybord 188,- DM Fuller FDS Key- 
bord 238,- DM Light Pen 84,- DM Floppy 
System lieferbar. Info anfordern, 
Meyer, Rahserstraße 58, 4060 Viersen, 
=@02162/22964 Händleranf. erwünscht 


Super Joystick Quickshot II 
für VC-20/C-64 und Atari VCS 
Reset-Taster für VC-20/C-64 
5,25 Zoll Disketten 10 St. DM 56,- 
Mignon NC-Akkus 10 St. DM 29,- 
Leicht, 8752 Mainaschaff, 06021/74704 


DM 39,50 


DM 10,- 


KONTAKTE 


BEBEBSSBBEBBERE 
| VC-20 OSTERREICH VC-20 u 
u Gratis Info bei P. Martin, w 
m Quellenstraße 74/20, 1100 Wien 
BEBBBBEBEBERBEBE 


VERSCHIEDENES 


Basic-Kurs VC 20 + VC 64 
Kompakt-Kurs I + Il Teil mit Kassette 
zu verkaufen. Information: Rolf Freitag, 
Gneisenaustraße 87, 4600 Dortmund 1 

20231/823826 oder gegen 

80 Pfennig Rückporto 


Auftrag für Gelegenheitsanzeigen in Gompute mit 


An Gompute mit 
Fuldaer Straße 6 
Postfach 629 


Name und Adresse 


3440 Eschwege 


Unterschrift Ich zahle sofort nach Rechnungserhalt. 


Unter der Rubrik "Kleinanzeigen’- 
veröffentlichen wir Gele- 
genheltsanzeigen für Verkaufsan- 
gebote, Kauf- und Tauschgesuche, 
Kontaktaufnahme bzw. Erfahrungs- 
austausch usw. 


Ich wünsche folgenden Text zu veröffentlichen: 


Preise für Kleinanzeigen’: 
Private Kleinanzeige je Druckzeile 
5,— DM inkl. MwSt. Chiffregebühr je 
Anzeige 10,- DM. 


Gewerbliche Gelegenheitsanzeige 
je Druckzeile 10,- DMinkl. MwSt. 
(dürfen nicht unter Chiffre er- 
scheinen). 


Zutreffendes ankreuzen 
OD Tausch U Versch. 
D Kontakte U Chiffre 


suche [[) Software 
biete an [[) Software 


suche [] Hardware 
biete an [] Hardware 
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Spiele — Spi | 
N piele- Spiele- Spiele- Spiele-S iele—Spi 
a piele-Spiele-Spiele : 
- iele — Spiele — Spiele — Spiele — S Ile. ee: 
nn 
p Spiele — 


00 
Commodore 69 yungry Morace Arcade u. Spaß 29.00 
82004 Krazy Kon Arcade Spiel om 35.00 
ca2010 Star Trek Arcade Spiel m 29.00 
92012 ap! ooks Arcade Spiel pm 35.00 VC-20 
2015 a Arcade Spiel pm 32.00 VC1000 
c82019 Pakacuda Arcade pm 29.00 vc1024 Gap a 
(82022 gtellar Dodger Arcade Spiel m 29.00 a Ra een, 
(82029 Jammin Arcade U. Musik v Mm 35. 00 VC1001 Rescue Weltaunn Em om 3500 | 
c82030 A mmin Diskette DM 29.00 vC1005 Space Attack Arcade (0 Hu On 200 
82031 Pipeline Arcade U Spaß pm 35.00 vC1007 Martin Ralder Arcade (0 Ei on 2300 | 
cB2032 Pipeline Diskette DM 23 00 VC1018 Moons of Jupit rcade (o. Erw) pn | 
82033 Srisder Superarcade Spiel mM 35 00 VC1020 Line up 4/Rev a om 20.00 | 
CB Dichys Diamonds Arcade U. Spaß va 29.00 N 025 ne us Labyrinh 6 E “. om zum | 
CB Arcade Spiel m 29.00 C1028 Any Siot (0 2; o | 
Ben ei DM 29. VC104 Power Blaster Erw) DM 29.00 | 
cB2011 Far Ara Spiel om En vC1003 Meran ae de A Om 20.00 
82014 a Wetraum-Arcade om 35.00 vC1029 Fluch des Pharao Adv Om 2400 
82020 Galaxla pm 65 vc1041 Pod a Manta Anne + 16K DM 1030 
Log Run Acti nts Action (0. Erw) un 
ction (0 Erw) = 29.00 
M 24.00 


c82013 


++ST | 
OP+-++ Stark reduzierte Preise +++STOP+++ Stark red 
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SpA igner 
= 5p4039 quiewsiiva rcade N\\) 
4042 Supet 
= = ee ee Arcade Action nz 2x3000 
{eb} pa045 1 Action W sr 
2 Spanı9 Ey suatent so) En ER) 0 Freyhoe 2 Pgme für ı 
& Spa0A eygyed ArC2 el (+ ao in 10 ee Hopper A, bin Taste 1x ie ZX-81 ng 
uw 5p4057 pi-palted Arcade Kett nar) pm 29. 3008 Balnete Tragpaı a 16K) 8 2 . : 
= ao vier = 18 Best Mt Loy (+ 168) GM a. 
5 Sp a 1 Krazy u er { N om “ | 
S m 3 Be Me 
: Mn TOR Amnae, 
= : 0m 19.50 ; 
= S | 
(97) 
A uper-Sonderan 
oa ote zum Zugreifen! 
H Bestellen hei reifen! 
= ICOSOFT, Nordst 
’ r. 2 Se 
2 Bitte benutzen Si 5 2448 ADLIESNANSEN Sy 
= e unsere Bestellkarte SER w 
2 ge ENG gm 
4 RN ee BE arte 
+ Stark org RO 
ark reduzierte Preise +++STOP+++S Kon re 
0 
tark reduzierte Preise + ++STop Stark 
af n . 
ark reduzierte Preise ++ 


